diff options
author | Andy Wingo <wingo@pobox.com> | 2009-05-22 21:14:48 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-05-22 21:14:48 +0200 |
commit | a755136ba8469fdccbcac956b4f5d8c6f4ec2a4e (patch) | |
tree | 83b3a4902cb21af6448b926c3be76e742bed2ac7 | |
parent | 0e7b72a8fefc27d67623b11659372b7ac37b7a58 (diff) | |
download | guile-a755136ba8469fdccbcac956b4f5d8c6f4ec2a4e.tar.gz |
fix (oop goops) compilation for (language tree-il primitives)
* module/oop/goops.scm (compile): Whoop-dee, fix up (oop goops) for
(language tree-il primitives) change.
-rw-r--r-- | module/oop/goops.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/oop/goops.scm b/module/oop/goops.scm index fd2d60058..6e3b15009 100644 --- a/module/oop/goops.scm +++ b/module/oop/goops.scm @@ -1128,7 +1128,7 @@ ;; lookup. Also, @slot-ref and @slot-set! have their own bytecodes. (eval-when (compile) - (use-modules ((language tree-il optimize) :select (add-interesting-primitive!))) + (use-modules ((language tree-il primitives) :select (add-interesting-primitive!))) (add-interesting-primitive! '@slot-ref) (add-interesting-primitive! '@slot-set!)) |