From e5225ff9bca5de88f610fa1a5bb4820ec41ecb65 Mon Sep 17 00:00:00 2001
From: pieter
Date: Mon, 25 Oct 1999 15:02:30 +0000
Subject: end of comment repaired to allow **/

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

(limited to 'frontend')

diff --git a/frontend/scanner.icl b/frontend/scanner.icl
index c54952f..1d579da 100644
--- a/frontend/scanner.icl
+++ b/frontend/scanner.icl
@@ -382,6 +382,7 @@ ScanComment input
 		# (eof2, c2, input)	= ReadChar input
 		| eof2				= (Yes "end of file encountered inside comment", input)
 		| c2 == '/'			= (No, input)
+		| c2 == '*'			= ScanComment (charBack input)
 							= ScanComment input
 	| otherwise				= ScanComment input
 
-- 
cgit v1.2.3