diff options
Diffstat (limited to 'ps05_pattern_matching/bnewbold_ps05.txt')
| -rw-r--r-- | ps05_pattern_matching/bnewbold_ps05.txt | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/ps05_pattern_matching/bnewbold_ps05.txt b/ps05_pattern_matching/bnewbold_ps05.txt index 64908a3..6ce38a1 100644 --- a/ps05_pattern_matching/bnewbold_ps05.txt +++ b/ps05_pattern_matching/bnewbold_ps05.txt @@ -44,6 +44,19 @@ Problem 5.4: ?:choice Problem 5.5: ?:pletrec, ?:ref -------------------------------- +I couldn't get match:list? to override for some reason, so '() isn't handled +with an eqv combinator like it should be. + +I used a global dictionary *pattern-table* which gets added to by each pletrec +statement and reset to '() by every matcher expression. + +[see code in bnewbold_ps05_work.scm] Problem 5.5: restrict -------------------------------- +Somewhere along the line i've made some horrible mistake handling lists because +the null list isn't handled right. But I can't figure out what's wrong, the +next step for me would be to rewrite everything; my namespace gets polluted +with old versions of handlers pretty fast. + +[see code in bnewbold_ps05_work.scm] |