1
0
Fork 0
git/t/t4034/scheme/post
Daniel Baumann 54102a2c29
Adding upstream version 1:2.47.2.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
2025-06-23 07:43:39 +02:00

6 lines
214 B
Text

(define (my-func first second)
; This is a (moderately) cool function.
(that\place (+ 3 4))
(define |a greeting| "hello")
(let ((c (add1 first)))
(format "one more than the total is %d" (+ c second))))