From c9a5a7badacd8dba9b5d7cf683301c8ead4b1f12 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 23 Apr 2016 22:11:48 -0700 Subject: 2862 Layers 0-29 are now a complete rudimentary platform except for pointers and indirection. --- 032array.cc | 14 -------------- 1 file changed, 14 deletions(-) (limited to '032array.cc') 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; -} -- cgit 1.4.1-2-gfad0