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>>"  | 
