diff options
author | bnewbold <bnewbold@eta.mit.edu> | 2009-03-16 13:44:46 -0400 |
---|---|---|
committer | bnewbold <bnewbold@eta.mit.edu> | 2009-03-16 13:44:46 -0400 |
commit | a50d7eefe9dd50eb0f3876d39e4359b7ed9d5e65 (patch) | |
tree | 409a2f7262a40e185fa416fa01868cfaa27efd03 /ps05_pattern_matching/bnewbold_ps05.txt | |
parent | 43fe6667ec5303ecf885c63a18c1568797478cfb (diff) | |
download | 6.945-a50d7eefe9dd50eb0f3876d39e4359b7ed9d5e65.tar.gz 6.945-a50d7eefe9dd50eb0f3876d39e4359b7ed9d5e65.zip |
as submitted, ps05
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] |