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