1
0
Fork 0
git/t/t4034/scheme/pre
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
186 B
Text

(define (myfunc a b)
; This is a really cool function.
(this\place (+ 3 4))
(define some-text "hello")
(let ((c (+ a b)))
(format "one more than the total is %d" (add1 c))))