flan/test/programs/pkg-shared.flan

16 lines
486 B
Plaintext

;;;; One package reached along two routes.
;;;;
;;;; raylib is imported here and again by sand.fln, which this also imports.
;;;; Loading it twice would declare every binding twice and be refused as a
;;;; collision, so a directory is read once and keyed by its real path. Nothing
;;;; calls into raylib, so nothing links it either.
(import sand "../../sand.fln")
(import rl "vendor:raylib")
(defn main [] i32
(sand/paint-at 4 (/ sand/cols 2))
(sand/step)
(println "ok")
0)