From 405629b7e9c1e90c3fecb6ae894a91a42bc49d58 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Fri, 14 Dec 2018 09:50:27 +0100
Subject: [PATCH] Handle program differently

---
 src/preprocessed_text.py | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/preprocessed_text.py b/src/preprocessed_text.py
index 4b7a8fd..21af15c 100644
--- a/src/preprocessed_text.py
+++ b/src/preprocessed_text.py
@@ -46,7 +46,6 @@ Fixed_form = 1
 ######################################################################
 # Dictionary of simple statements
 simple_dict = {
-        "program":               Program         ,
         "subroutine":            Subroutine      ,
         "begin_shell":           Begin_shell     ,
         "end_shell":             End_shell       ,
@@ -140,6 +139,9 @@ def get_type (i, filename, line, is_doc):
   if firstword == "begin_doc":
     return [ Begin_doc       (i,line,filename) ], True
 
+  if firstword == "program":
+    return [ Program         (i,line,filename) ], False
+
   if is_doc:
     return [ Doc (i,line,filename) ], is_doc