home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
o
/
os2xlisp.zip
/
LISP.LOG
< prev
next >
Wrap
Text File
|
1992-06-26
|
371b
|
14 lines
T
> (define viocalls (loadmodule "viocalls"))
1360
> (define viowrttty (getprocaddr viocalls "VIOWRTTTY"))
15142831
> (define hello "Hello world\n")
"Hello world\n"
> (call viowrttty msg (word (length msg)) (word 0))
error: unbound variable - MSG
if continued: try evaluating symbol again
1> (call viowrttty hello (word (length hello)) (word 0))
0
1> (exit)