diff options
| author | johnvg | 2006-02-02 11:31:42 +0000 |
|---|---|---|
| committer | johnvg | 2006-02-02 11:31:42 +0000 |
| commit | 2bb39aaa65bf92e868bb02c421db40b9e7f9c7b3 (patch) | |
| tree | 449f9d22c8f0b49bcc7e6c4cd479283b63793090 | |
| parent | Moved forward declaration of static functions from inside functions (diff) | |
remove unused function 'isRhsStartToken '
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1592 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | frontend/parse.icl | 8 |
1 files changed, 0 insertions, 8 deletions
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 '=' |