include-source.glisp 413 B

123456789101112131415161718192021
  1. ; (println "Here in base ")
  2. (source-file "./tests/inc.g" "./tests/inc1.g")
  3. ; (println "Calling function defined in inc.g")
  4. (assert (= (simple) "from include"))
  5. ; (println "Calling function defined in inc1.g")
  6. (assert (= (simple1) "from include 1"))
  7. ; (println (simple))
  8. ; (println (simple1))
  9. (include "./tests/inc2.g" "./tests/inc3.g")
  10. (assert (= (inc2) "from inc2.g"))
  11. (assert (= (inc3) "from inc3.g"))