diff options
| author | dos-reis <gdr@axiomatics.org> | 2008-01-16 21:35:55 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2008-01-16 21:35:55 +0000 |
| commit | 71e48772bf2d5d0f12b221b62f851eca77c2ae7d (patch) | |
| tree | f8538b4242d4e3ec77fbdd13f6f35951feae1d06 /src/testsuite/compiler | |
| parent | ed82a24534ef85fddfabadb3a3f9fca47ce63fda (diff) | |
| download | open-axiom-71e48772bf2d5d0f12b221b62f851eca77c2ae7d.tar.gz | |
Fix SF/1872564
* interp/compiler.boot (compPretend): Don't check for `new'
compiler semantics.
(compColonInside): Likewise.
* testsuite/compiler/1872564.spad: New.
Diffstat (limited to 'src/testsuite/compiler')
| -rw-r--r-- | src/testsuite/compiler/1872564.spad | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/testsuite/compiler/1872564.spad b/src/testsuite/compiler/1872564.spad new file mode 100644 index 00000000..505a10b3 --- /dev/null +++ b/src/testsuite/compiler/1872564.spad @@ -0,0 +1,7 @@ +++ Contributed by Luke Wagner +++ Issue: The compiler should allow pretend from Union types. +)abbrev package TEST Test +Test() : with + foo : Union(Integer, Float) -> SExpression + == add + foo u == u pretend SExpression |