flan/test/programs/twins.flan

11 lines
330 B
Plaintext

;;;; Two packages, each with a file called util.flan and a function at the
;;;; same line and column of it: the source annotation of a disassembly has to
;;;; tell the two files apart (test_dev.ml).
(import twin-a "pkgs/twin-a")
(import twin-b "pkgs/twin-b")
(defn main [] i32
(print (+ (twin-a/twin 1) (twin-b/twin 2)))
0)