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

12 lines
211 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))