diff options
| author | bnewbold <bnewbold@eta.mit.edu> | 2009-05-11 13:45:12 -0400 |
|---|---|---|
| committer | bnewbold <bnewbold@eta.mit.edu> | 2009-05-11 13:45:12 -0400 |
| commit | 38e10dc81d5f8f1a2bbededb790e775c0c637d6c (patch) | |
| tree | c1c97634df0c0ff31f70d87462ad1f1390fd301f /final_project/work/ghelper.scm | |
| parent | ca6558941cf604b2e5ddb8fe38261091a99f6d09 (diff) | |
| download | 6.945-38e10dc81d5f8f1a2bbededb790e775c0c637d6c.tar.gz 6.945-38e10dc81d5f8f1a2bbededb790e775c0c637d6c.zip | |
files from laura
Diffstat (limited to 'final_project/work/ghelper.scm')
| -rw-r--r-- | final_project/work/ghelper.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/final_project/work/ghelper.scm b/final_project/work/ghelper.scm index 4e39cbe..c74426b 100644 --- a/final_project/work/ghelper.scm +++ b/final_project/work/ghelper.scm @@ -1,4 +1,6 @@ -;;; From 6.945 Staff, with minor edit by bnewbold (May 2009) +;;; From 6.945 Staff, with minor edit by bnewbold (May 2009): +;;; the optional name argument is handled in the style of +;;; the scmutils implementation ;;;; Most General Generic-Operator Dispatch @@ -103,4 +105,4 @@ (begin (if (not (null? tree)) (warn "Replacing top-level handler:" tree handler)) - handler)))))
\ No newline at end of file + handler))))) |