home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!zaphod.mps.ohio-state.edu!uwm.edu!bionet!agate!paris.CS.Berkeley.EDU!luigi
- From: luigi@paris.CS.Berkeley.EDU (Luigi Semenzato)
- Newsgroups: comp.unix.cray
- Subject: Re: getting value of B02 from C
- Message-ID: <17j4rmINNn8u@agate.berkeley.edu>
- Date: 27 Aug 92 17:53:58 GMT
- References: <17h7riINNdki@agate.berkeley.edu>
- Organization: University of California, Berkeley
- Lines: 17
- NNTP-Posting-Host: paris.cs.berkeley.edu
-
- Thanks to jjd@teak.cray.com, and others, for the following simple
- solution:
-
- IDENT GETB02
- ENTRY GETB02
-
- SECTION CODE
-
- GETB02 ENTER NP=0,MODE=BASELVL
- A5 B02
- S1 A5
- EXIT MODE=BASELVL
-
- END
-
- This routine can never cause a stack overflow (it never uses
- the stack at all), so my fears where unfounded. --Luigi
-