From e27977203ec599aa14ec78bb1bf82e1a68ae1dd2 Mon Sep 17 00:00:00 2001
From: martinw
Date: Tue, 6 Jun 2000 10:25:46 +0000
Subject: see previous revision

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

(limited to 'frontend')

diff --git a/frontend/scanner.icl b/frontend/scanner.icl
index 8e17d42..c296e63 100644
--- a/frontend/scanner.icl
+++ b/frontend/scanner.icl
@@ -1918,7 +1918,5 @@ freadPreprocessedLine file
 		= loop pattern line (i-1)
 	replace_beginning_with :: !String !*String -> .String
 	replace_beginning_with replacement string
-		# result = { string & [i] = replacement.[i] \\ i<-[0..size replacement-1] }
-		| True--->("replaced", result)
-			= result
+		= { string & [i] = replacement.[i] \\ i<-[0..size replacement-1] }
 // ..MW8
-- 
cgit v1.2.3