scsh-0.6/ps-compiler/prescheme/test/integers.scm

12 lines
169 B
Scheme
Raw Normal View History

2003-05-01 06:21:33 -04:00
; Copyright (c) 1994 by Richard Kelsey. See file COPYING.
(define (main)
(write-number (+ (read-number (current-input-port)) 100)
(current-output-port))
0)