diff options
| author | johnvg | 2003-12-11 15:18:52 +0000 |
|---|---|---|
| committer | johnvg | 2003-12-11 15:18:52 +0000 |
| commit | 0468f6b8191867d014a3aaab4264569b78f0bd42 (patch) | |
| tree | 374cc09c35800ce42e3ee31206b0e33f5e98af68 /backend/backendpreprocess.icl | |
| parent | remove BackendBody (diff) | |
move FunctionPattern type from syntax to backendconvert
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1428 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backend/backendpreprocess.icl')
| -rw-r--r-- | backend/backendpreprocess.icl | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/backend/backendpreprocess.icl b/backend/backendpreprocess.icl index 47274b1..85aba8c 100644 --- a/backend/backendpreprocess.icl +++ b/backend/backendpreprocess.icl @@ -175,17 +175,6 @@ instance sequence LetBind where sequence bind = sequence bind.lb_dst -instance sequence FunctionPattern where - sequence (FP_Algebraic _ subpatterns optionalVar) - = sequence subpatterns - o` sequence optionalVar - sequence (FP_Variable freeVar) - = sequence freeVar - sequence (FP_Basic _ optionalVar) - = sequence optionalVar - sequence FP_Empty - = identity - instance sequence (Ptr VarInfo) where sequence varInfoPtr = assignSequenceNumber varInfoPtr |