From 4676535346177cd3852fc15b138239956bd70acf Mon Sep 17 00:00:00 2001
From: johnvg
Date: Thu, 21 Apr 2005 11:55:20 +0000
Subject: remove unused variable s

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1533 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/unitype.icl | 1 -
 1 file changed, 1 deletion(-)

diff --git a/frontend/unitype.icl b/frontend/unitype.icl
index 7a86e5c..6f377d9 100644
--- a/frontend/unitype.icl
+++ b/frontend/unitype.icl
@@ -764,7 +764,6 @@ where
 
 tryToMakeNonUnique :: !Int !*Coercions -> (!Bool, !*Coercions)
 tryToMakeNonUnique attr coercions=:{coer_demanded}
-	#! s = size coer_demanded
 	| isUnique coer_demanded.[attr]
 //		-?-> (s <= attr, ("tryToMakeNonUnique", s, attr))]
 		= (False, coercions)
-- 
cgit v1.2.3