tock-mirror/testcases/hello.occ

5 lines
86 B
Plaintext

#USE "course"
PROC hello (CHAN OF BYTE out)
out.string ("Hello, world*n", 0, out)
: