diff options
| author | zweije | 2001-08-29 14:27:29 +0000 |
|---|---|---|
| committer | zweije | 2001-08-29 14:27:29 +0000 |
| commit | a1955845a04de02486829387946a34ed818d0707 (patch) | |
| tree | d9d38dda6c44bbc4613f9f564ed4beb1a4eda53e | |
| parent | This commit was generated by cvs2svn to compensate for changes in r686, (diff) | |
This commit was generated by cvs2svn to compensate for changes in r688,
which included commits to RCS files with non-trunk default branches.
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@689 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | sucl/newfold.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sucl/newfold.icl b/sucl/newfold.icl index ebb6550..a654f5a 100644 --- a/sucl/newfold.icl +++ b/sucl/newfold.icl @@ -211,7 +211,7 @@ matchpattern :: (FuncBody sym var) -> FuncBody sym var -matchpattern _ _ _ = undef +matchpattern _ _ _ = error "newfold: matchpattern: not yet implemented" rule2body rule = buildgraph (arguments rule) (ruleroot rule) (rulegraph rule) |