summaryrefslogtreecommitdiff
path: root/t/t4018/scheme-define-variant
blob: 911708854d24e799779e4167ae2745aa834bd49c (plain)
1
2
3
4
(define* (some-func x y z) RIGHT
  (let ((a x)
        (b y))
        (ChangeMe a b)))