aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2012-05-05 03:03:21 +0000
committerdos-reis <gdr@axiomatics.org>2012-05-05 03:03:21 +0000
commitbc043d9ee39d772cc767d98a80cb5c0ddffe6b19 (patch)
treea85c0a60f6c2ba57eb11b75a323abd218c07758a /src/interp/c-util.boot
parent6c9193053770172afdd6bb0dc39881f934f06724 (diff)
downloadopen-axiom-bc043d9ee39d772cc767d98a80cb5c0ddffe6b19.tar.gz
* interp/define.boot (compileConstructor1): Don't call
clearConstructorCache here. Simplify. (compileConstructor): Call clearConstructorCache here. * interp/c-util.boot (backendCompile2): Do not test for membership of $clamList. * interp/clam.boot (compHash): Use compQuietly instead of compileQuietly.
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r--src/interp/c-util.boot1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index 50861e5f..e43cd164 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -1542,7 +1542,6 @@ backendCompile2: %Code -> %Symbol
backendCompile2 code ==
code isnt [name,[type,args,:body]] =>
systemError ['"parenthesis error in: ", code]
- symbolTarget(name,$clamList) => compClam(name,args,body,$clamList)
type = "SPADSLAM" => backendCompileSPADSLAM(name,args,body)
assembleCode [name,[type,args,:body]]