diff options
Diffstat (limited to 'src/interp/i-coerfn.boot')
| -rw-r--r-- | src/interp/i-coerfn.boot | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/interp/i-coerfn.boot b/src/interp/i-coerfn.boot index 36d5772b..bef965fc 100644 --- a/src/interp/i-coerfn.boot +++ b/src/interp/i-coerfn.boot @@ -32,7 +32,8 @@ -- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. -import i_-coerce +import i_-analy +import i_-resolv namespace BOOT $coerceFailure := gensym() @@ -1976,9 +1977,7 @@ $CoerceTable == '( _ (Tuple indeterm L2Tuple) _ (Vector indeterm L2V) _ ))_ - ) -$CoerceTable == append!($CoerceTable,'( _ (Matrix . ( _ (List indeterm M2L) _ (RectangularMatrix partial M2Rm) _ @@ -2099,7 +2098,7 @@ $CoerceTable == append!($CoerceTable,'( _ (SquareMatrix indeterm V2Sm) _ (Stream indeterm Agg2Agg) _ ) ) _ - ) ) + ) -- this list is too long for the parser, so it has to be split into parts -- specifies the commute functions |