home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2XLSP1.ZIP / LISP.LOG < prev    next >
Text File  |  1988-07-22  |  371b  |  14 lines
  1. T
  2. > (define viocalls (loadmodule "viocalls"))
  3. 1360
  4. > (define viowrttty (getprocaddr viocalls "VIOWRTTTY"))
  5. 15142831
  6. > (define hello "Hello world\n")
  7. "Hello world\n"
  8. > (call viowrttty msg (word (length msg)) (word 0))
  9. error: unbound variable - MSG
  10. if continued: try evaluating symbol again
  11. 1> (call viowrttty hello (word (length hello)) (word 0))
  12. 0
  13. 1> (exit)
  14.