main.scm 513 B

12345678910111213141516171819
  1. (import
  2. ;; only importing what is needed from rnrs base
  3. (except (rnrs base) let-values)
  4. ;; only importing what is needed from guile itself, other than that use stuff
  5. ;; from rnrs base.
  6. (only (guile) lambda* λ error when display sleep current-output-port)
  7. ;; custom imports
  8. (prefix (lib mylib) mylib:)
  9. (prefix (helper) helper:))
  10. (define main
  11. (λ ()
  12. (simple-format (current-output-port) "~a\n" (mylib:myproc 0))
  13. (simple-format (current-output-port) "~a\n" (helper:myproc 0))))
  14. (main)