home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / sys / hp48 / 5565 < prev    next >
Encoding:
Internet Message Format  |  1992-11-05  |  3.0 KB
  1. Path: sparky!uunet!gumby!wupost!waikato.ac.nz!fee
  2. From: fee@waikato.ac.nz
  3. Newsgroups: comp.sys.hp48
  4. Subject: Re: sys_RPL EVAL??? and DEBUGer ???
  5. Message-ID: <1992Nov6.085639.11983@waikato.ac.nz>
  6. Date: 6 Nov 92 08:56:39 +1300
  7. References: <1992Nov5.093538.11956@waikato.ac.nz> <MHEISKAN.92Nov5011224@lk-hp-21.hut.fi>
  8. Organization: University of Waikato, Hamilton, New Zealand
  9. Lines: 60
  10.  
  11. In article <MHEISKAN.92Nov5011224@lk-hp-21.hut.fi>, mheiskan@snakemail.hut.fi (Mika Heiskanen) writes:
  12. > 
  13. > In article <1992Nov5.093538.11956@waikato.ac.nz> fee@waikato.ac.nz writes:
  14. >>What is the sys_RPL command that will evaluate an object on the stack?
  15. >>eg: given a secondary which has been pulled out of a list of other
  16. >>secondaries, what command actually evaluates the secondary?
  17. > 
  18. >>I want:
  19. >>                1:{<< "success" >>} ---> 1:<< "success" >>
  20. > 
  21. >>then:        
  22. >>        1:<< "success" >> --->  1: "success"
  23. > 
  24. >>but I can only get to the left-hand expression on the second line 
  25. >>using sys_RPL.
  26. > 
  27. [stuff deleted]
  28. > 
  29. > Thus use COMPEVAL for the list.
  30. >              
  31. > --> mheiskan@vipunen.hut.fi
  32.  
  33. Thanks Mika. However I tried your solution but to no avail. COMPEVAL
  34. appears to work in exactly the same way as (user) EVAL but it seems
  35. for my problem, that it has to be executed twice. I wrote a sys_RPL routine 
  36. containing only COMPEVAL in it to try this.
  37.  
  38. There is a catch. If I try COMPEVAL on a secondary or a secondary enclosed
  39. in a list all of which was written from the keyboard - no problem. COMPEVAL
  40. evaluates the secondary in one step.
  41.  
  42. However, the original secondary needs two COMPEVAL's to evaluate it, with
  43. the first COMPEVAL apparently thinking for a bit and leaving the stack (at
  44. least the display) unchanged. A second COMPEVAL will evaluate the secondary.
  45.  
  46. My secondary was created in the sys_RPL routine by adding strings
  47. together (including the << and >> symbols) and then "palparse"'d to create
  48. the secondary and then place it in a list. If I do an OBJ-> then DROP the
  49. flag, the secondary still requires two COMPEVALs or EVALs. However, doing
  50. a TYPE on the secondary immediately after the OB-> DROP returns an 8,
  51. signifying that it is a secondary. Why does it require two COMPEVALs then?
  52. It seems almost as if the object has to go through some kind of operation
  53. at least once before it can be evaluated. Has it got some kind of weird
  54. garbage attached that the HP is removing the first time around?
  55.  
  56. [By the way, if I include two COMPEVALs in a sys_RPL routine - the HP doesn't
  57. like it. The stack is cleared and I am returned to the MTH menu, almost 
  58. like a warm start, but without reattaching the libraries. So two COMPEVALs
  59. isn't the answer - it needs two single COMPEVAL operations.]
  60.  
  61. Still confused.
  62. Conan.
  63. -- 
  64. -----------------------------------------------------------------
  65. Conan J. Fee                _      fee@waikato.ac.nz
  66. Centre for Technology              (_)o    
  67. University of Waikato, Hamilton    /\  \   Phone: +(64)(7)8384206
  68. Private Bag 3105, New Zealand              Fax:   +(64)(7)8384218
  69. -----------------------------------------------------------------
  70.  
  71.