diff options
author | johnvg | 2011-05-10 13:45:26 +0000 |
---|---|---|
committer | johnvg | 2011-05-10 13:45:26 +0000 |
commit | 851602809c397be0fa3bde9ed89eca0a9ebdd927 (patch) | |
tree | c2dd6a8facb349d1c78de019bc2d19822998f0b7 /sucl/trd.dcl | |
parent | delete portToNewSyntax (diff) |
delete sucl, the same files can be found in the branch sucl
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1940 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'sucl/trd.dcl')
-rw-r--r-- | sucl/trd.dcl | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/sucl/trd.dcl b/sucl/trd.dcl deleted file mode 100644 index 09b2467..0000000 --- a/sucl/trd.dcl +++ /dev/null @@ -1,25 +0,0 @@ -definition module trd - -// $Id$ - -from rule import Rule -from graph import Node -from StdOverloaded import == - -/* -`Ruletype theap symtype rule' determines the type of `rule'. -`Theap' must be an endless supply of type variables. -`Symtype' associates type rules with the symbols that occur in `rule'. - -If typing does not succeed, the function aborts. -*/ - -ruletype - :: .[tvar] - ((Node sym var) -> Rule tsym trvar) - (Rule sym var) - -> .Rule tsym tvar - | == var - & == tsym - & == tvar - & == trvar |