Excellent.

I think this will do it.

MyFunct
  new NakeRef set NakedRef=$$LGR^%ZOSV

  ...

  new discard set discard=$get(@NakedRef)
  quit

Thanks
Kevin



--- Gregory Woodhouse
<[EMAIL PROTECTED]> wrote:

> I believe there's an entry point in %ZOSV to call
> the platform  
> dependent method of getting the last global
> reference.
> 
> ===
> Gregory Woodhouse
> [EMAIL PROTECTED]
> 
> Better. Faster. Cheaper. Pick two.
> 
> 
> On Jun 20, 2005, at 3:13 PM, Kevin Toppenberg wrote:
> 
> > Speaking of my debugger (in other thread), I am
> > considering again a problem I had in creating it.
> >
> > Because my code is called between every line of
> the
> > source code, I have to be careful not to change
> the
> > environment, or the program running will be
> confused.
> > One of the things to not be changed would be the
> naked
> > reference.  Thus, if I make any references to a
> global
> > variable in my debugging code, it will change the
> > naked reference for the next line of the source
> code.
> >
> > I would like to be able to store debugging data in
> a
> > global (i.e. screen width etc) rather than hard
> coding
> > it.  So I need to "save" the nake reference, so I
> can
> > restore it after my debugging code is done.
> >
> > I thought that I could perhaps save the name of
> the
> > nake reference somehow, and then reference it
> again as
> > I was leaving my code.  But I'm hazy about how to
> do
> > this.
> >
> > Any idea about how to save a nake reference?
> >
> > Thanks
> > Kevin
> >
> >
> > __________________________________________________
> > Do You Yahoo!?
> > Tired of spam?  Yahoo! Mail has the best spam
> protection around
> > http://mail.yahoo.com
> >
> >
> >
>
-------------------------------------------------------
> > SF.Net email is sponsored by: Discover Easy Linux
> Migration Strategies
> > from IBM. Find simple to follow Roadmaps,
> straightforward articles,
> > informative Webcasts and more! Get everything you
> need to get up to
> > speed, fast.
>
http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
> > _______________________________________________
> > Hardhats-members mailing list
> > [email protected]
> >
>
https://lists.sourceforge.net/lists/listinfo/hardhats-members
> >
> 
> 
> 
>
-------------------------------------------------------
> SF.Net email is sponsored by: Discover Easy Linux
> Migration Strategies
> from IBM. Find simple to follow Roadmaps,
> straightforward articles,
> informative Webcasts and more! Get everything you
> need to get up to
> speed, fast.
>
http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
> _______________________________________________
> Hardhats-members mailing list
> [email protected]
>
https://lists.sourceforge.net/lists/listinfo/hardhats-members
> 



                
____________________________________________________ 
Yahoo! Sports 
Rekindle the Rivalries. Sign up for Fantasy Football 
http://football.fantasysports.yahoo.com


-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members

Reply via email to