home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 5 / FreshFish_July-August1994.bin / bbs / util / jade-3.0.lha / Jade / lisp / debugrc.jlc < prev    next >
Encoding:
Text File  |  1994-04-20  |  130 b   |  3 lines
  1.  
  2. (while t (write (stdout-file) "jade> ") (flush-file (stdout-file)) (format (stdout-file) " => %S\n" (eval (read (stdin-file)))))
  3.