From 2bb39aaa65bf92e868bb02c421db40b9e7f9c7b3 Mon Sep 17 00:00:00 2001
From: johnvg
Date: Thu, 2 Feb 2006 11:31:42 +0000
Subject: remove unused function 'isRhsStartToken '

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

(limited to 'frontend')

diff --git a/frontend/parse.icl b/frontend/parse.icl
index 2eb7f2b..aa3afb0 100644
--- a/frontend/parse.icl
+++ b/frontend/parse.icl
@@ -852,14 +852,6 @@ where
 	ExprWithLocals		=	[ LetBefore ] sep RootExpression endOfDefinition [ LocalFunctionDefs ]
 */
 
-
-isRhsStartToken :: !ParseContext !Token -> Bool
-isRhsStartToken parseContext EqualToken			= True
-isRhsStartToken parseContext ColonDefinesToken	= isGlobalOrClassOrInstanceDefsContext parseContext
-isRhsStartToken parseContext DefinesColonToken	= True
-isRhsStartToken parseContext DoubleArrowToken	= True // PK
-isRhsStartToken parseContext _					= False
-
 :: RhsDefiningSymbol
 	=	RhsDefiningSymbolExact Token
 	|	RhsDefiningSymbolCase			// '->' or '='
-- 
cgit v1.2.3