handball/src/test/run-pass/funcs.scm

16 lines
218 B
Scheme

#lang scheme
(define (displayln x)
(display x)
(newline))
(define add1 +)
(displayln (add1 2 3))
(define add2 (lambda (a b) (+ a b)))
(displayln (add2 5 6))
(define (add3 a b)
(+ a b))
(displayln (add3 5 9))