aboutsummaryrefslogtreecommitdiffstats
path: root/ortho/mcode/ortho_code-dwarf.ads
diff options
context:
space:
mode:
Diffstat (limited to 'ortho/mcode/ortho_code-dwarf.ads')
-rw-r--r--ortho/mcode/ortho_code-dwarf.ads3
1 files changed, 3 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-dwarf.ads b/ortho/mcode/ortho_code-dwarf.ads
index bdd07eb16..c120bcfe1 100644
--- a/ortho/mcode/ortho_code-dwarf.ads
+++ b/ortho/mcode/ortho_code-dwarf.ads
@@ -22,6 +22,9 @@ package Ortho_Code.Dwarf is
-- For a body.
procedure Emit_Subprg (Bod : O_Dnode);
+ -- Emit all debug info until but not including LAST.
+ procedure Emit_Decls_Until (Last : O_Dnode);
+
-- For a line in a subprogram.
procedure Set_Line_Stmt (Line : Int32);
procedure Set_Filename (Dir : String; File : String);