diff options
author | Andy Wingo <wingo@pobox.com> | 2010-06-16 21:32:52 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2010-06-16 21:32:52 +0200 |
commit | e5602ce73e1b440fe8c70c34d89fd6ff7f8e9d0a (patch) | |
tree | 34c6547d1c15113003d7a17d267b2194417a0ce3 | |
parent | 393929957d9c2db998824e52c0a100b53ac64fe4 (diff) | |
download | guile-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.scm | 2 |
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)) |