commit e483c6e31ded4837a9c75eea03bf6ba8862ef254
author Nguyen Anh Quynh <aquynh@gmail.com> Mon Sep 22 00:07:58 2014 +0800
committer Nguyen Anh Quynh <aquynh@gmail.com> Mon Sep 22 00:07:58 2014 +0800
tree 599f00eaf27ce0b169084a5abeb733faaf914d1d
parent 7e181fb509c8456954584f0d476133493af42218

ocaml: update constants

bindings/const_generator.py

diff --git a/bindings/const_generator.py b/bindings/const_generator.py
index dc0ff92..0b97622 100644
--- a/bindings/const_generator.py
+++ b/bindings/const_generator.py
@@ -65,8 +65,8 @@
 MARKUP = '//>'
 
 def gen(lang):
-    templ = template[lang]
     global include, INCL_DIR
+    templ = template[lang]
     for target in include:
         prefix = templ[target]
         outfile = open(templ['out_file'] %(prefix), 'w')
@@ -110,10 +110,11 @@
                         if (count == 1):
                             outfile.write("\n")
                     except ValueError:
-                        # ocaml variable has _ as prefix
                         if lang == 'ocaml':
+                            # ocaml uses lsl for '<<', lor for '|'
                             rhs = rhs.replace('<<', ' lsl ')
                             rhs = rhs.replace('|', ' lor ')
+                            # ocaml variable has _ as prefix
                             if rhs[0].isalpha():
                                 rhs = '_' + rhs