scheme-playground/first.scm

5 lines
76 B
Scheme
Raw Normal View History

2024-08-20 14:44:13 +00:00
(define (p) (p))
(define (test x y) (if (= x 0) 0 y))
(print (test 1 (p)))