module-2.scm 416 B

1234567891011121314151617181920212223242526272829
  1. ;;; examples/modules/module-2.scm -- Module system demo.
  2. ;;; Commentary:
  3. ;;; Module 2 of the module demo program.
  4. ;;; Author: Martin Grabmueller
  5. ;;; Date: 2001-05-29
  6. ;;; Code:
  7. (define-module (module-2))
  8. (export foo bar braz)
  9. (define (foo)
  10. (display "module-2 foo")
  11. (newline))
  12. (define (bar)
  13. (display "module-2 bar")
  14. (newline))
  15. (define (braz)
  16. (display "module-2 braz")
  17. (newline))
  18. ;;; End of file.