(sexp_check_token): Removed check for "any" token.

All callers specify the token they expect.
(sexp_parse): Pass on comment tokens.

Rev: nettle/tools/parse.c:1.2

tools/parse.c

@@ -72,7 +72,7 @@ sexp_check_token(struct sexp_parser *parser,
 		 parser->transport ? SEXP_CANONICAL : parser->mode,
 		 string);
 
-  if (token && parser->input->token != token)
+  if (parser->input->token != token)
     die("Syntax error.\n");
 }
 
@@ -141,6 +141,10 @@ sexp_parse(struct sexp_parser *parser,
 	  token->type = SEXP_STRING;
 	  goto check_transport_end;
 
+	case SEXP_COMMENT:
+	  token->type = SEXP_COMMENT;
+	  return;
+
 	case SEXP_TRANSPORT_START:
 	  if (parser->mode == SEXP_CANONICAL)
 	    die("Base64 not allowed in canonical mode.\n");