From ec1662fb0182a87ebf39ec476109becfc7a8cdb1 Mon Sep 17 00:00:00 2001
From: Pearu Peterson <pearu.peterson@gmail.com>
Date: Fri, 30 Jun 2006 13:36:13 +0000
Subject: Writting parser unittests, fixed bugs.

---
 numpy/f2py/lib/base_classes.py | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'numpy/f2py/lib/base_classes.py')

diff --git a/numpy/f2py/lib/base_classes.py b/numpy/f2py/lib/base_classes.py
index b5be7d00a..cdae17f03 100644
--- a/numpy/f2py/lib/base_classes.py
+++ b/numpy/f2py/lib/base_classes.py
@@ -27,7 +27,7 @@ class Statement:
 
         self.process_item()
 
-    def get_indent_tab(self,colon='',deindent=False):
+    def get_indent_tab(self,colon=None,deindent=False):
         if self.reader.isfix:
             tab = ' '*6
         else:
@@ -41,6 +41,11 @@ class Statement:
         if self.item is None:
             return tab
         s = self.item.label
+        if colon is None:
+            if self.reader.isfix:
+                colon = ''
+            else:
+                colon = ':'
         if s:
             c = ''
             if self.reader.isfix:
-- 
cgit v1.2.1