diff options
author | Andy Wingo <wingo@pobox.com> | 2018-06-27 14:57:51 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-06-27 14:57:51 +0200 |
commit | 8918165c4050766dd920b66df9fdad33eb3f42d7 (patch) | |
tree | 43bb1cb2409c86369e872c6029441599e8ac306b /libguile/vm-engine.c | |
parent | 0faa4144d14723c2774af88c146617e9ef2e066b (diff) | |
download | guile-8918165c4050766dd920b66df9fdad33eb3f42d7.tar.gz |
Compile current-module as intrinsic call
* libguile/fluids.c (scm_i_fluid_ref): New internal function.
(scm_fluid_ref): Use scm_i_fluid_ref.
* libguile/intrinsics.h:
* libguile/intrinsics.c (current_module): New intrinsic.
* libguile/modules.c (scm_i_current_module): New internal function.
(scm_current_module): Use new internal function.
* module/language/cps/reify-primitives.scm (compute-known-primitives):
Add current-module as an intrinsic primitive.
* module/system/vm/assembler.scm (define-scm<-thread-intrinsic):
(current-module): Arrange to compile to intrinsic call.
Diffstat (limited to 'libguile/vm-engine.c')
0 files changed, 0 insertions, 0 deletions