Support generating signed numbers.

2020-01-14 12:13:40 -10:00
parent 4383b67c44
commit e46cfe56d1
15 changed files with 218 additions and 30 deletions
--- a/generation/src/Division.hs
+++ b/generation/src/Division.hs
@@ -30,7 +30,7 @@ declareDivision size _ =
    let sname = mkIdent ("U" ++ show size)
        entries = size `div` 64
        copyAssign = map doCopy [0..entries-1]
-        testFileLit = Lit [] (Str (testFile size) Cooked Unsuffixed mempty) mempty
+        testFileLit = Lit [] (Str (testFile True size) Cooked Unsuffixed mempty) mempty
    in [sourceFile|
        use core::ops::{Div, DivAssign};
        use core::ops::{Rem, RemAssign};