diff options
| author | Eugen Wissner <belka@caraus.de> | 2024-10-30 14:12:51 +0100 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2024-10-30 14:12:51 +0100 |
| commit | 43882a3a0697945b35194c2b5940605e9f4dd846 (patch) | |
| tree | 494bde0fec422937f26b7b1a954adbcd477f7a9b /lib/Language/Elna/Glue.hs | |
| parent | 6b92e5059c04709b3506bb4e7bef29872b16811f (diff) | |
| download | elna-43882a3a0697945b35194c2b5940605e9f4dd846.tar.gz | |
Generate a call to _divide_by_zero_error on RiscV
Diffstat (limited to 'lib/Language/Elna/Glue.hs')
| -rw-r--r-- | lib/Language/Elna/Glue.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Language/Elna/Glue.hs b/lib/Language/Elna/Glue.hs index 70161a0..880bb1e 100644 --- a/lib/Language/Elna/Glue.hs +++ b/lib/Language/Elna/Glue.hs @@ -267,6 +267,6 @@ expression localTable = \case ) literal :: AST.Literal -> Operand Variable -literal (AST.IntegerLiteral integer) = IntOperand integer +literal (AST.DecimalLiteral integer) = IntOperand integer literal (AST.HexadecimalLiteral integer) = IntOperand integer literal (AST.CharacterLiteral character) = IntOperand $ fromIntegral character |