diff options
| author | martinw | 2000-04-26 09:10:34 +0000 |
|---|---|---|
| committer | martinw | 2000-04-26 09:10:34 +0000 |
| commit | 1e8f9d92be20258186661009221e60034fc53f06 (patch) | |
| tree | 7b82bbcc810aa9fdfa04b0912914a8139d8683bc /frontend/StdCompare.dcl | |
| parent | small bugfix (diff) | |
changes to make compiler compatible with itself
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@126 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/StdCompare.dcl')
| -rw-r--r-- | frontend/StdCompare.dcl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/frontend/StdCompare.dcl b/frontend/StdCompare.dcl index a46ee4d..c4a94e2 100644 --- a/frontend/StdCompare.dcl +++ b/frontend/StdCompare.dcl @@ -9,14 +9,12 @@ Equal :== 0 class (=<) infix 4 a :: !a !a -> CompareValue -instance =< Int, Expression, {# Char}, Ident, [a] | =< a, BasicType //, Global a | =< a +instance =< Int, Expression, {# Char}, Ident, [a] | =< a, BasicType //, (Global a) | =< a instance =< Type instance == BasicType, TypeVar, TypeSymbIdent, DefinedSymbol, TypeContext , BasicValue, - FunKind, Global a | == a, Priority, Assoc - -export == Int + FunKind, (Global a) | == a, Priority, Assoc instance < MemberDef |