Commit 2dacc462 authored by Camil Staps's avatar Camil Staps 🚀

Add ABC argument types for stack sizes

parent 8fab6010
......@@ -225,6 +225,8 @@ from Text.GenJSON import generic JSONEncode, generic JSONDecode, :: JSONNode
= ABCTypeLabel
| ABCTypeAStackOffset
| ABCTypeBStackOffset
| ABCTypeAStackSize
| ABCTypeBStackSize
| ABCTypeBool
| ABCTypeChar
| ABCTypeInt
......
......@@ -36,6 +36,8 @@ where
ABCTypeLabel -> "label"
ABCTypeAStackOffset -> "A-offset"
ABCTypeBStackOffset -> "B-offset"
ABCTypeAStackSize -> "A-size"
ABCTypeBStackSize -> "B-size"
ABCTypeBool -> "bool"
ABCTypeChar -> "char"
ABCTypeInt -> "int"
......@@ -51,6 +53,8 @@ where
"label" -> Just ABCTypeLabel
"A-offset" -> Just ABCTypeAStackOffset
"B-offset" -> Just ABCTypeBStackOffset
"A-size" -> Just ABCTypeAStackSize
"B-size" -> Just ABCTypeBStackSize
"bool" -> Just ABCTypeBool
"char" -> Just ABCTypeChar
"int" -> Just ABCTypeInt
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment