diff options
| author | Chouser <chouser@n01se.net> | 2015-02-06 23:58:41 -0500 |
|---|---|---|
| committer | Chouser <chouser@n01se.net> | 2015-02-21 13:22:44 -0500 |
| commit | 168fb5dc56fee6653816ee8236259940e575c7ec (patch) | |
| tree | f3207b32946453028ce9477726b4f7150b12cc5d /forth/types.fs | |
| parent | 50e417ffe32c238189e61c9701696602d40bb7f3 (diff) | |
| download | mal-168fb5dc56fee6653816ee8236259940e575c7ec.tar.gz mal-168fb5dc56fee6653816ee8236259940e575c7ec.zip | |
forth: Add step 1, but not maps
Diffstat (limited to 'forth/types.fs')
| -rw-r--r-- | forth/types.fs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/forth/types.fs b/forth/types.fs index 75996f8..7f6b6ea 100644 --- a/forth/types.fs +++ b/forth/types.fs @@ -184,6 +184,10 @@ deftype* constant MalList def-protocol-method conj ( obj this -- this ) +MalType% + cell% field MalVector/list +deftype* constant MalVector + \ Examples of extending existing protocol methods to existing type MalDefault extend conj ( obj this -- this ) |