From 39e20be61569d541feb51f3ef9333a7e4728b66b Mon Sep 17 00:00:00 2001
From: martinw
Date: Mon, 18 Oct 1999 10:20:25 +0000
Subject: lots of changes in module trans to make fusion work.

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@16 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/utilities.icl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'frontend/utilities.icl')

diff --git a/frontend/utilities.icl b/frontend/utilities.icl
index 51e11ce..c74b2e0 100644
--- a/frontend/utilities.icl
+++ b/frontend/utilities.icl
@@ -148,9 +148,9 @@ where
 	fold_st2 [] [] st
 		= st
 	fold_st2 [] ys st
-		= abort ("fold_st2: second argument list contains more elements" ---> ys)
+		= abort ("fold_st2: second argument list contains more elements")
 	fold_st2 xs [] st
-		= abort ("fold_st2: first argument list contains more elements" ---> xs)
+		= abort ("fold_st2: first argument list contains more elements")
 
 // foldSt :: !(.a -> .(.st -> .st)) ![.a] !.st -> .st
 foldSt op r l :== fold_st r l
-- 
cgit v1.2.3