9 lines
194 B
Text
9 lines
194 B
Text
integer fn = open(iff(platform()=WIN32?"PRN":"/dev/lp0"),"w")
|
|
if fn=-1 then
|
|
puts(1,"some error")
|
|
else
|
|
puts(fn,"Hello World!")
|
|
close(fn)
|
|
puts(1,"success!")
|
|
end if
|
|
{} = wait_key()
|