git/t/t4034/scheme/pre

7 lines
186 B
Plaintext

(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))))