diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-10-21 17:29:02 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-10-21 17:29:02 +0200 |
| commit | 459ffbfa71366beb87436f02352e33d31c700aab (patch) | |
| tree | 44d5ad50843977b247bc176659ee731e339a70cb /src/ghdldrv/ghdllocal.adb | |
| parent | e050ffb26e51cb3c064342ecb01822ab7c269712 (diff) | |
| download | ghdl-459ffbfa71366beb87436f02352e33d31c700aab.tar.gz ghdl-459ffbfa71366beb87436f02352e33d31c700aab.tar.bz2 ghdl-459ffbfa71366beb87436f02352e33d31c700aab.zip | |
ghdllocal: clean post files.
Diffstat (limited to 'src/ghdldrv/ghdllocal.adb')
| -rw-r--r-- | src/ghdldrv/ghdllocal.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb index fbc27087e..19481e88b 100644 --- a/src/ghdldrv/ghdllocal.adb +++ b/src/ghdldrv/ghdllocal.adb @@ -873,6 +873,9 @@ package body Ghdllocal is begin Delete (Str & Obj_Suffix.all & Nul); Delete (Str & Asm_Suffix & Nul); + if Flag_Postprocess then + Delete (Str & Post_Suffix & Nul); + end if; end Delete_Asm_Obj; procedure Delete_Top_Unit (Str : String) is |