diff options
Diffstat (limited to 'ortho/debug')
| -rw-r--r-- | ortho/debug/ortho_debug.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ortho/debug/ortho_debug.adb b/ortho/debug/ortho_debug.adb index 7ca70c1e6..e61886ef2 100644 --- a/ortho/debug/ortho_debug.adb +++ b/ortho/debug/ortho_debug.adb @@ -1671,6 +1671,8 @@ package body Ortho_Debug is Add_Stmt (N); end New_Procedure_Call; + procedure New_Elsif_Stmt (Block : in out O_If_Block; Cond : O_Enode); + procedure Start_If_Stmt (Block : in out O_If_Block; Cond : O_Enode) is subtype O_Snode_If is O_Snode_Type (ON_If_Stmt); |