Article 2956 of comp.sys.handhelds:
Path: en.ecn.purdue.edu!noose.ecn.purdue.edu!samsung!zaphod.mps.ohio-state.edu!ub!acsu.buffalo.edu
From: cloos@acsu.buffalo.edu (James H. Cloos)
Newsgroups: comp.sys.handhelds
Subject: Re: HP48: Code Objects in User Language Programs
Message-ID: <52082@eerie.acsu.Buffalo.EDU>
Date: 18 Dec 90 02:48:03 GMT
References: <kskalb.661187537@faui1f>
Sender: news@acsu.Buffalo.EDU
Organization: State University of New York @ Buffalo
Lines: 38
Nntp-Posting-Host: lictor.acsu.buffalo.edu

In article <kskalb.661187537@faui1f> kskalb@faui1f.informatik.uni-erlangen.de (Klaus Kalb) writes:
[etc.]
>Can a code object be included into a user language program ?
>If yes, how ?
[etc.]

You will have to use a function such as \->PRG posted previously by
Rick Grevelle.  (see below).  To do this, write your usrlang program
as usual, execute PRG\-> to put each element of the porgram on the
stack, put your code object on the stack, then use ROLLD & ROLL to
position the CODE where it belongs in the program (interactive stack
helps here).  If you left a marker for where the code was to be
inserted, make sure you remove it from the stack, if you didn't, make
sure you increment the #_of_elements count that PRG\-> left on level
1.  Now use \->PRG to combine the elements back into a program.

The four programs in the downloadable dir below need to be run thru
ASC\-> to use them.  Here is the DIR:

%%HP: T(3)A(R)F(.);
DIR
  \->PRG
"D9D2043C8154450B21305CEC"
  PRG\->
"D9D202BA812BF81F3040379C1B21305293"
  ALG\->
"D9D202BA812BF8194040379C1B2130C3D2"
  \->ALG
"D9D2043C81D6450B2130474F"
END

These routines do do argument checking.

-JimC
--
James H. Cloos, Jr.		Phone:  +1 716 673-1250
cloos@ACSU.Buffalo.EDU		Snail:  PersonalZipCode:  14048-0772, USA
cloos@ub.UUCP			Quote:  <>