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