summaryrefslogtreecommitdiff
path: root/t/t4018/scheme-top-level-define
blob: 624743c22b91eeed651e4f020828d13b838c3bc0 (plain)
1
2
3
4
(define (some-func x y z) RIGHT
  (let ((a x)
        (b y))
        (ChangeMe a b)))