10 lines
274 B
Plaintext
10 lines
274 B
Plaintext
;;;; The other middle. Imports the same shape, under the same alias.
|
|
;;;;
|
|
;;;; Reached along a second route, shape must already be loaded and must not
|
|
;;;; be loaded again.
|
|
|
|
(import shape "../shape")
|
|
|
|
(defn describe [b shape/Box] i32
|
|
(if (shape/is-wide b) (.w b) (.h b)))
|