home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Texteditors / Textra116 / Scripts / JForth_Scripts / tojf.textra < prev    next >
Encoding:
Text File  |  1996-09-27  |  228 b   |  11 lines
  1. /* send a string to the JForth interpreter... */
  2.  
  3. OPTIONS results
  4.  
  5. parse arg theString   /* get the argument */
  6. if (theString == "") then
  7.     theString = '" JForth Professional just says HI!" $type cr'
  8.  
  9. address 'JFORTH' theString
  10.  
  11.