[bpt/guile.git] / examples / modules / module-2.scm

;;; examples/modules/module-2.scm -- Module system demo.

;;; Commentary:

;;; Module 2 of the module demo program.

;;; Author: Martin Grabmueller
;;; Date: 2001-05-29

;;; Code:

(define-module (module-2))

(export foo bar braz)

(define (foo)
  (display "module-2 foo")
  (newline))

(define (bar)
  (display "module-2 bar")
  (newline))

(define (braz)
  (display "module-2 braz")
  (newline))

;;; End of file.
Commit	Line	Data
2de7ddb7 MG	1	;;; examples/modules/module-2.scm -- Module system demo.
	2
	3	;;; Commentary:
	4
	5	;;; Module 2 of the module demo program.
	6
	7	;;; Author: Martin Grabmueller
	8	;;; Date: 2001-05-29
	9
	10	;;; Code:
	11
	12	(define-module (module-2))
	13
	14	(export foo bar braz)
	15
	16	(define (foo)
	17	(display "module-2 foo")
	18	(newline))
	19
	20	(define (bar)
	21	(display "module-2 bar")
	22	(newline))
	23
	24	(define (braz)
	25	(display "module-2 braz")
	26	(newline))
673509f8 MG	27
673509f8 MG	28	;;; End of file.