Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!sdd.hp.com!hp-pcd!hpcvra.cv.hp.com!rnews!hpcvbbs!akcs.kevin
From: akcs.kevin@hpcvbbs.UUCP (Kevin Jessup)
Newsgroups: comp.sys.handhelds
Subject: Re: Clean code
Keywords: hp48
Message-ID: <27a1af52:1812.1comp.sys.handhelds;1@hpcvbbs.UUCP>
Date: 26 Jan 91 16:40:20 GMT
References: <3290@gmuvax2.gmu.edu>
Lines: 14

I agree!!  I wish more HP48SX programmers would use the PRESERVE program
that save flags, runs the application and then restores the flags.
I usually end up modifying the main routine of other peoples programs
to incorporate this function.  The program is described on page 555 od
the 48SX (Rev A) manuals.

PRESERVE
\<< RCLF
 \\-> f
\<< EVAL f STOF
\>>
\>>

Preserve will save the flags, evaluate the object on LEVEL 1 and
restore the flags.