summaryrefslogtreecommitdiff
path: root/t/t4034/scheme/post
blob: 63b6ac4f8754d81671d65482129a2909acfee8d2 (plain)
1
2
3
4
5
6
(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))))