fix: warnings fix (after -Wall -Wextra)

src/compiler/fzl_parser.c

@@ -56,19 +56,6 @@ static fzl_token_t *peek(fzl_parser_t *parser)
   return parser->cursor->token;
 }
 
-// Get token at (cursor + 1)
-static fzl_token_t *next(fzl_parser_t *parser)
-{
-  if (!parser || !parser->cursor)
-    return NULL;
-
-  fzl_reader_ll_t *next = parser->cursor->next;
-  if (!next)
-    return NULL;
-
-  return next->token;
-}
-
 // Consume token at cursor and move to the next
 static fzl_token_t *consume(fzl_parser_t *parser)
 {
@@ -204,8 +191,7 @@ fzl_node_t *parse_postfix(fzl_parser_t *parser)
   if (!parser)
     return NULL;
 
-  fzl_node_t *left  = parse_primary(parser);
-  fzl_node_t *right = NULL;
+  fzl_node_t *left = parse_primary(parser);
 
   if (!left)
   {
@@ -766,7 +752,15 @@ fzl_node_t *parse_function(fzl_parser_t *parser)
   if (!parser)
     return NULL;
 
-  fzl_token_t *fn   = consume(parser);
+  fzl_token_t *fn = consume(parser);
+  if (fn->type != FZL_TOKTYPE_FUNCTION)
+  {
+    snprintf(plast_err, sizeof(plast_err),
+             "'%s': expected keyword 'fn' at %ld:%ld", last_known_tok->filename,
+             last_known_tok->ln, last_known_tok->cn);
+    return NULL;
+  }
+
   fzl_token_t *name = consume(parser);
   if (!name || name->type != FZL_TOKTYPE_NAME)
   {
@@ -1131,7 +1125,7 @@ void fzl_freeast(fzl_node_t *root)
 
     fzl_node_t *next = root->next;
     free(root);
-    root = root->next;
+    root = next;
   }
 }