diff options
Diffstat (limited to 'src/interp/diagnostics.boot')
| -rw-r--r-- | src/interp/diagnostics.boot | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/src/interp/diagnostics.boot b/src/interp/diagnostics.boot index c5075839..ecaf9c7c 100644 --- a/src/interp/diagnostics.boot +++ b/src/interp/diagnostics.boot @@ -44,6 +44,21 @@ import vmlisp namespace BOOT +++ Subroutine of moanRetract. +makeReasonable s == + # s > 30 => + strconc('"expression beginning ",subString(s,0,20)) + s + +++ This rountine is used by the runtime system to report failed +++ attempt to coerce a value from one type to another. Usually +++ this involves Union branches or SubDomains or other forms +++ of retraction. +moanRetract(v,t) == + error + strconc(makeReasonable STRINGIMAGE v,'" cannot be coerce to mode ", + outputDomainConstructor t) + ++ This routine is used by the interperter to count syntax, or ++ precompilation, or semantics analysis errors. |