home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / sys / hp48 / 6875 < prev    next >
Encoding:
Text File  |  1993-01-11  |  1.4 KB  |  65 lines
  1. Newsgroups: comp.sys.hp48
  2. Path: sparky!uunet!gatech!concert!seq!turing.u-strasbg.FR!fatri
  3. From: fatri@turing.u-strasbg.FR (fatri -- licence info. --)
  4. Subject: Everlasting Lambda Variables
  5. Message-ID: <9301111547.AA01580@turing.u-strasbg.fr>
  6. Sender: daemon@seq.uncwil.edu (Admin)
  7. Organization: UNCW news/mail gateway service
  8. Date: Mon, 11 Jan 1993 15:47:15 GMT
  9. Lines: 54
  10.  
  11.  
  12. While programming in sys-rpl I found something unusual.
  13.  
  14. Usually when a program ends, all the lambda variables are cleared, they 
  15. no longer exist, enen when the program doesn't do it explicitelly
  16. ( by the ABND command ).
  17.  
  18. Here is a little program that allows you to bind something to a lambda
  19. variable that still exist even after a KILL or a CONT.
  20.  
  21. It takes two arguments , any object from level two and an global name
  22. from level 1.
  23. execute it and then press ON, the program will be aborted but
  24. a lambda variable ( that contains the object in level two ) named the same
  25. as the global name you entered will be existing until you execute 
  26. a ABND command.
  27.  
  28. Unusual isn't it ?
  29.  
  30. ::
  31.  CK2NOLASTWD
  32.  CK&DISPATCH1
  33.  #6
  34.  ::
  35.   ID>LAM
  36.   #1
  37.   DOBIND
  38.   {
  39.    {
  40.     NULL$
  41.     ::
  42.      $ "Press ON"
  43.      NULL$
  44.      EvalNoCK:
  45.      xINPUT
  46.     ;
  47.    }
  48.   }
  49.   InitMenu
  50.   #1#1
  51.   Key>StdKeyOb
  52.   EVAL
  53.  ;
  54. ;
  55.  
  56. begin 644 lambda
  57. M2%!(4#0X+46=+="H&+*/L0($G2W0K@7Y/T!.!W0J0*<"+"I0  "=+<"B A4 
  58. G "57-C<'\N3T705JCZ%,(BLQL!(#*S%@^$#$.J:Q/XYOL!(#*S$ 
  59.  
  60. end
  61.  
  62.  
  63. Fatri (fatri@turing.u-strasbg.fr)
  64.  
  65.