9 lines
247 B
Plaintext
9 lines
247 B
Plaintext
;;;; The package's second file. It is in the same directory, so mix is its
|
|
;;;; own to call.
|
|
|
|
(defn twice [a i32] i32 (mix a a))
|
|
|
|
(defn apply2 [f (Fn [i32 i32] i32) a i32 b i32] i32 (f a b))
|
|
|
|
(defn via-value [a i32 b i32] i32 (apply2 mix a b))
|