summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-06-16 21:32:52 +0200
committerAndy Wingo <wingo@pobox.com>2010-06-16 21:32:52 +0200
commite5602ce73e1b440fe8c70c34d89fd6ff7f8e9d0a (patch)
tree34c6547d1c15113003d7a17d267b2194417a0ce3
parent393929957d9c2db998824e52c0a100b53ac64fe4 (diff)
downloadguile-e5602ce73e1b440fe8c70c34d89fd6ff7f8e9d0a.tar.gz
set module version in module-export-all!
* module/ice-9/boot-9.scm (module-export-all!): Set the interface version as well.
-rw-r--r--module/ice-9/boot-9.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm
index 450a6e4db..b17f747fa 100644
--- a/module/ice-9/boot-9.scm
+++ b/module/ice-9/boot-9.scm
@@ -3107,7 +3107,7 @@ module '(ice-9 q) '(make-q q-length))}."
(define (fresh-interface!)
(let ((iface (make-module)))
(set-module-name! iface (module-name mod))
- ;; for guile 2: (set-module-version! iface (module-version mod))
+ (set-module-version! iface (module-version mod))
(set-module-kind! iface 'interface)
(set-module-public-interface! mod iface)
iface))