Target generation, ideally, to those files we'll need for doing crypto.

generation/src/Generators.hs

@@ -1,9 +1,14 @@
 module Generators
  where
 
+import Language.Rust.Data.Position
+import Language.Rust.Syntax
 import Numeric(showHex)
 import System.Random(RandomGen,random,randomR)
 
+toLit :: Word -> Expr Span
+toLit i = Lit  [] (Int Dec (fromIntegral i) Unsuffixed mempty) mempty
+
 generateNum :: RandomGen g => g -> Word -> (Integer, g)
 generateNum g size =
   let (x, g') = random g