summaryrefslogtreecommitdiff
path: root/ortho/mcode/ortho_code-disps.ads
diff options
context:
space:
mode:
Diffstat (limited to 'ortho/mcode/ortho_code-disps.ads')
-rw-r--r--ortho/mcode/ortho_code-disps.ads1
1 files changed, 1 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-disps.ads b/ortho/mcode/ortho_code-disps.ads
index fdd648f..5ae4d86 100644
--- a/ortho/mcode/ortho_code-disps.ads
+++ b/ortho/mcode/ortho_code-disps.ads
@@ -19,6 +19,7 @@ with Ortho_Code.Exprs; use Ortho_Code.Exprs;
package Ortho_Code.Disps is
procedure Disp_Subprg (Subprg : Subprogram_Data_Acc);
+ procedure Disp_Type (Atype : O_Tnode; Force : Boolean := False);
procedure Init;
procedure Finish;
end Ortho_Code.Disps;