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

11 lines
185 B
Scheme
Raw Permalink Normal View History

1999-09-14 08:45:02 -04:00
; Copyright (c) 1994 by Richard Kelsey. See file COPYING.
(define foo
(external (=> (int32 int32) unit)
(lambda (x y)
(display (+ x y)))))
(define (test)
(foo 3 4))