diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-04-23 22:11:48 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-04-24 00:35:50 -0700 |
commit | c9a5a7badacd8dba9b5d7cf683301c8ead4b1f12 (patch) | |
tree | 3062a12c4fda9757ef633e56f0abc8b8efbe594b /032array.cc | |
parent | 7bf9212fd47e505711cc0873d30456e3d793034d (diff) | |
download | mu-c9a5a7badacd8dba9b5d7cf683301c8ead4b1f12.tar.gz |
2862
Layers 0-29 are now a complete rudimentary platform except for pointers and indirection.
Diffstat (limited to '032array.cc')
-rw-r--r-- | 032array.cc | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/032array.cc b/032array.cc index e54b7ea6..44d063d9 100644 --- a/032array.cc +++ b/032array.cc @@ -465,17 +465,3 @@ case LENGTH: { recipe_ordinal r = current_instruction().operation; if (r == CREATE_ARRAY || r == INDEX || r == PUT_INDEX || r == LENGTH) return false; - -//: a particularly common array type is the string, or address:array:character -:(code) -bool is_mu_string(const reagent& x) { - return x.type - && x.type->value == get(Type_ordinal, "address") - && x.type->right - && x.type->right->value == get(Type_ordinal, "shared") - && x.type->right->right - && x.type->right->right->value == get(Type_ordinal, "array") - && x.type->right->right->right - && x.type->right->right->right->value == get(Type_ordinal, "character") - && x.type->right->right->right->right == NULL; -} |