Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!caen!news.cs.indiana.edu!msi.umn.edu!noc.MR.NET!gacvx2.gac.edu!hhdist
Newsgroups: comp.sys.handhelds
Subject: RE: hp48sx: variable rename?
Message-ID: <9104032337.AA923696@nike.calpoly.edu>
From: srosemer@nike.calpoly.edu (Steven Warren Rosemergy)
Date: Wed, 3 Apr 91 15:37:10 -0800
Return-path: <srosemer@nike.calpoly.edu>
To: handhelds@gac.edu
Lines: 15

brunner posted a program that renames objects; but, he forgot about
directories.  Here's a program that deals with this:

\<< \-> old new \<< VARS old POS 
VARS SWAP new PUT 
old RCL
		IF TYPE 15 ==
		THEN old RCL
old PGDIR new STO
		ELSE old RCL
old PURGE new STO
		END ORDER
		\>>
\>>