;; csc this-file.scm && ./this-file

(require-extension srfi-18 posix)

(define mythread (make-thread (lambda () (print "in your thread!"))))

(thread-start! mythread)

(print (read-line))