Hs2Py constants: additional module jstore

Add constants from additional modules ('ganeti.jstore') to the Haskell
to Python constant generation.
Signed-off-by: Jose A. Lopes <jabolopes@google.com>
Reviewed-by: Klaus Aehlig <aehlig@google.com>

autotools/convert-constants

@@ -298,7 +298,7 @@ def Convert(module, prefix):
 
 
 def main():
-  print Convert(jstore, "jstore")
+  pass
 
 
 if __name__ == "__main__":

lib/jstore.py

@@ -31,7 +31,7 @@ from ganeti import utils
 from ganeti import pathutils
 
 
-JOBS_PER_ARCHIVE_DIRECTORY = 10000
+JOBS_PER_ARCHIVE_DIRECTORY = constants.JSTORE_JOBS_PER_ARCHIVE_DIRECTORY
 
 
 def _ReadNumericFile(file_name):

src/Ganeti/HsConstants.hs

@@ -4548,3 +4548,8 @@ errorsEcodeAll =
                       , errorsEcodeInval
                       , errorsEcodeEnviron
                       ]
+
+-- * Jstore related constants
+
+jstoreJobsPerArchiveDirectory :: Int
+jstoreJobsPerArchiveDirectory = 10000