diff options
author | Kartik Agaram <vc@akkartik.com> | 2018-05-12 19:55:21 -0700 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2018-05-12 20:14:49 -0700 |
commit | 1fb0cf9ef9e616163039fd4df6584c6c2ba68d23 (patch) | |
tree | cdffcc21108054c20585d74b4c57634e929c6c4c /027call_ingredient.cc | |
parent | cdf2822743b3beeb37ebc3deea8e08b6130698c5 (diff) | |
download | mu-1fb0cf9ef9e616163039fd4df6584c6c2ba68d23.tar.gz |
4243
Diffstat (limited to '027call_ingredient.cc')
-rw-r--r-- | 027call_ingredient.cc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/027call_ingredient.cc b/027call_ingredient.cc index 06a18b10..46fafe7e 100644 --- a/027call_ingredient.cc +++ b/027call_ingredient.cc @@ -179,13 +179,13 @@ bool is_mu_text(reagent/*copy*/ x) { return x.type && !x.type->atom && x.type->left->atom - && x.type->left->value == get(Type_ordinal, "address") + && x.type->left->value == Address_type_ordinal && x.type->right && !x.type->right->atom && x.type->right->left->atom - && x.type->right->left->value == get(Type_ordinal, "array") + && x.type->right->left->value == Array_type_ordinal && x.type->right->right && !x.type->right->right->atom - && x.type->right->right->left->value == get(Type_ordinal, "character") + && x.type->right->right->left->value == Character_type_ordinal && x.type->right->right->right == NULL; } |