aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r--src/interp/c-util.boot14
1 files changed, 0 insertions, 14 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index b0ecbb73..a24b4539 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -1759,20 +1759,6 @@ compAndDefine l ==
$compileDontDefineFunctions := true
-++ Subroutine of compileInteractive.
-compQuietly fn ==
- _*COMP370_-APPLY_* :=
- $InteractiveMode =>
- $compileDontDefineFunctions => "COMPILE-DEFUN"
- "EVAL-DEFUN"
- "PRINT-DEFUN"
- quietlyIfInteractive backendCompile fn
-
-COMP370 x ==
- first x is [.,:.] => [COMPILE1 y for y in x]
- [COMPILE1 x]
-
-
--%
--% Compile Time operation lookup for the benefit of domain inlining.
--%