txlyre 1 week ago
parent
commit
ac2034ca55
1 changed files with 4 additions and 4 deletions
  1. 4 4
      jk.c

+ 4 - 4
jk.c

@@ -6813,7 +6813,7 @@ node_t *parser_parse_atom(parser_t *parser) {
   return node;
 }
 
-bool isunb(interpreter_t *state, char *s) {
+bool is_unbound(interpreter_t *state, char *s) {
   if (state->args->data) {
     list_t *args = list_index(state->args, -1);
     size_t argc = args->length - 1;
@@ -6834,7 +6834,7 @@ node_t *parser_parse_sequence(parser_t *parser, node_t *a,
 
   if ((tok = parser_lookahead(parser, 0)) &&
       (tok->tag == tag || (tag == T_NUMBER && tok->tag == T_BNUMBER))) {
-    if (tag == T_NAME && !isunb(parser->state, tok->text))
+    if (tag == T_NAME && !is_unbound(parser->state, tok->text))
       return NULL;
 
     list_t *as = list_new();
@@ -6843,7 +6843,7 @@ node_t *parser_parse_sequence(parser_t *parser, node_t *a,
 
     do {
       if (tag == T_NAME && tok->tag == T_NAME &&
-          !isunb(parser->state, tok->text))
+          !is_unbound(parser->state, tok->text))
         break;
 
       a = parser_parse_atom(parser);
@@ -6867,7 +6867,7 @@ node_t *_parser_parse_noun(parser_t *parser) {
       (n = parser_parse_sequence(parser, a, T_NUMBER)))
     return n;
   else if (a->tag == N_LITERAL && a->v->tag == SYMBOL &&
-           isunb(parser->state, a->v->val.symbol) &&
+           is_unbound(parser->state, a->v->val.symbol) &&
            (n = parser_parse_sequence(parser, a, T_NAME)))
     return n;
   else if (a->tag == N_LITERAL &&