diff options
| author | Joel Martin <github@martintribe.org> | 2014-04-20 21:50:52 -0500 |
|---|---|---|
| committer | Joel Martin <github@martintribe.org> | 2014-04-20 21:50:52 -0500 |
| commit | a3b0621dbfbb7afd2bff5a08a727660142240150 (patch) | |
| tree | fff280338345ca909166df2f586a637f5d846ce5 /perl/printer.pm | |
| parent | 9af8aee63aad6031c12f2b04ba87c16cc3273077 (diff) | |
| download | mal-a3b0621dbfbb7afd2bff5a08a727660142240150.tar.gz mal-a3b0621dbfbb7afd2bff5a08a727660142240150.zip | |
Perl: add step2_eval.
Diffstat (limited to 'perl/printer.pm')
| -rw-r--r-- | perl/printer.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl/printer.pm b/perl/printer.pm index 9741eda..94219d4 100644 --- a/perl/printer.pm +++ b/perl/printer.pm @@ -26,6 +26,7 @@ sub _pr_str { return '{' . join(' ', @elems) . '}'; } when(/^String/) { return '"' . $$obj . '"'; } + when(/^CODE/) { return '<builtin_fn* ' . $obj . '>'; } default { return $$obj; } } } |