Avoid filling twice token values.

[TP_AL_C.git] / lexer / syntactic_analyzer.c
diff --git a/lexer/syntactic_analyzer.c b/lexer/syntactic_analyzer.c

index 5f14600699f60354ca18cf31189703244c7996d4..b9787df6976e51eccc1a8d9a1dd7baae08e43e8c 100644 (file)
--- a/lexer/syntactic_analyzer.c
+++ b/lexer/syntactic_analyzer.c
@@ -1,7 +1,6 @@
  /* Syntactic analyzer */
  
  #include <stdbool.h>
-#include <stdarg.h>
  #include <stdlib.h>
  
  #include "global_vars.h"
@@ -47,10 +46,10 @@ static void analyze_P() {
          #if PRINT_TOKEN
          wprint_ctoken(stdout);
          #endif /* PRINT_TOKEN */
-        scanner();
          if (target != NULL) {
              fputws(L"<p>\n", target);
          }
+        scanner();
          analyze_TEXT();
          if (target != NULL) {
              fputws(L"\n</p>\n", target);
@@ -84,8 +83,8 @@ static void analyze_HEAD() {
              #if PRINT_TOKEN
              wprint_ctoken(stdout);
              #endif /* PRINT_TOKEN */
-            scanner();
              fputws(L"<meta name=\"author\" content=\"", target);
+            scanner();
              analyze_TEXT();
              fputws(L"\">", target);
          } else if (tokenType != NPARA && tokenType != SECTION && tokenType != FIN) {
@@ -217,6 +216,9 @@ void analyze_AXIOME() {
      if (target != NULL) {
          fputws(L"\n<body>\n", target);
      }
+    #if PRINT_TOKEN
+    wprint_ctoken(stdout);
+    #endif /* PRINT_TOKEN */
      if (tokenType != FIN) {
          fprintf(stderr, "%s follows error on %s\n", __func__, tokenTypestr[tokenType]);
          fflush(stderr);