diff options
author | Truls Asheim <truls@asheim.dk> | 2018-05-29 21:52:49 +0200 |
---|---|---|
committer | tgingold <tgingold@users.noreply.github.com> | 2018-05-30 08:04:16 +0200 |
commit | 2891b9661aa547095732cad759bc3805a238269e (patch) | |
tree | 6e538ee3c507ed65be43d8be21063ce5e9316fb8 /src/ortho/mcode/ortho_code-dwarf.adb | |
parent | 5b728dca30c6d85692731d62f40052037131e5f1 (diff) | |
download | ghdl-2891b9661aa547095732cad759bc3805a238269e.tar.gz ghdl-2891b9661aa547095732cad759bc3805a238269e.tar.bz2 ghdl-2891b9661aa547095732cad759bc3805a238269e.zip |
Remove redundant use-clauses for gcc 8.1 compatibility
Diffstat (limited to 'src/ortho/mcode/ortho_code-dwarf.adb')
-rw-r--r-- | src/ortho/mcode/ortho_code-dwarf.adb | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/ortho/mcode/ortho_code-dwarf.adb b/src/ortho/mcode/ortho_code-dwarf.adb index b65abaf83..0275b870f 100644 --- a/src/ortho/mcode/ortho_code-dwarf.adb +++ b/src/ortho/mcode/ortho_code-dwarf.adb @@ -819,7 +819,6 @@ package body Ortho_Code.Dwarf is procedure Emit_Record_Type (Atype : O_Tnode; Decl : O_Dnode) is - use Ortho_Code.Types; procedure Finish_Gen_Abbrev is begin Gen_Abbrev_Tuple (DW_AT_Byte_Size, DW_FORM_Udata); @@ -851,7 +850,6 @@ package body Ortho_Code.Dwarf is procedure Emit_Union_Type (Atype : O_Tnode; Decl : O_Dnode) is - use Ortho_Code.Types; procedure Finish_Gen_Abbrev is begin Gen_Abbrev_Tuple (DW_AT_Byte_Size, DW_FORM_Udata); @@ -958,7 +956,6 @@ package body Ortho_Code.Dwarf is procedure Emit_Type (Atype : O_Tnode) is use Ortho_Code.Types; - use Ada.Text_IO; Kind : OT_Kind; Decl : O_Dnode; begin |