aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/stream.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-10-05 03:06:07 +0000
committerdos-reis <gdr@axiomatics.org>2008-10-05 03:06:07 +0000
commit4da4e775ade14aa9e8c2d0b4b106e743e4d283a4 (patch)
tree19637c59f3b6bb3748c84edcc348ba68ee8614b7 /src/algebra/stream.spad.pamphlet
parent27362ea43a4c1da88e23e3014c0fcb66ef7a2cfc (diff)
downloadopen-axiom-4da4e775ade14aa9e8c2d0b4b106e743e4d283a4.tar.gz
* interp/c-util.boot (isAtomicForm): New.
(replaceSimpleFunctions): Use it. Simplify back to original implementation. (proclaimCapsuleFunction): Constructor parameters are generic. * interp/sys-utility.boot (getVMType): Handle wildcard. * algebra/stream.spad.pamphlet: Don't build STREAM with proclamation on -- it currently violates type rules.
Diffstat (limited to 'src/algebra/stream.spad.pamphlet')
-rw-r--r--src/algebra/stream.spad.pamphlet3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/algebra/stream.spad.pamphlet b/src/algebra/stream.spad.pamphlet
index 0241548c..66d7a227 100644
--- a/src/algebra/stream.spad.pamphlet
+++ b/src/algebra/stream.spad.pamphlet
@@ -550,6 +550,9 @@ CyclicStreamTools(S,ST): Exports == Implementation where
@
\section{domain STREAM Stream}
<<domain STREAM Stream>>=
+-- As explained below, in the capsule, the Rep for STREAM is actually
+-- a half lie. So, the system should not be allowed to trust it.
+)boot $optProclaim := false
import Type
import Void
import Boolean