;; -*- Mode: Irken -*-
(include "lib/core.scm")
(define (other-fun)
{d=2 e=#t f="there"})
(define thing
0 f -> {d=1 e=#f f="hello" a=7}
_ f -> (let ((r (other-fun)))
(%rextend/a r 34))
)
(define (thing2)
(let ((r {a=0 b=1 c=2}))
(%rextend/b r 12)))
(printn (thing 2 other-fun))
(printn (thing2))