diff options
Diffstat (limited to 'Intermediate.hs')
-rw-r--r-- | Intermediate.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Intermediate.hs b/Intermediate.hs index 0e181a4..95f6cc7 100644 --- a/Intermediate.hs +++ b/Intermediate.hs @@ -41,6 +41,7 @@ data Terminator = IBr Ref Int Int | IJmp Int | IRet Ref + | ITailC Ref [Ref] | IExit | IUnknown deriving Eq @@ -91,5 +92,6 @@ instance Show Terminator where show (IBr r b1 b2) = "br " ++ show r ++ " " ++ show b1 ++ " " ++ show b2 show (IJmp b) = "jmp " ++ show b show (IRet r) = "ret " ++ show r + show (ITailC r as) = "tailc " ++ show r ++ " " ++ show as show IExit = "exit" show IUnknown = "<<UNKNOWN>>" |