From dc94eccbfc1867944db544e6632d6e7f7575b4fa Mon Sep 17 00:00:00 2001
From: Andreas Kloeckner <inform@tiker.net>
Date: Sun, 15 Feb 2015 21:08:17 -0600
Subject: [PATCH] Fold constants on parsed Fortran kernels

---
 loopy/frontend/fortran/translator.py | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/loopy/frontend/fortran/translator.py b/loopy/frontend/fortran/translator.py
index b7cdeb195..1f74ac62a 100644
--- a/loopy/frontend/fortran/translator.py
+++ b/loopy/frontend/fortran/translator.py
@@ -645,7 +645,7 @@ class F2LoopyTranslator(FTreeWalkerBase):
                     default_order="F"
                     )
 
-            proc_dict[sub.subprogram_name] = knl
+            proc_dict[sub.subprogram_name] = lp.fold_constants(knl)
 
         transform_code = remove_common_indentation(
                 self.transform_code_lines)
-- 
GitLab