diff options
| author | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2006-06-22 19:30:52 +0000 |
|---|---|---|
| committer | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2006-06-22 19:30:52 +0000 |
| commit | 06c89bf159a88b4339295b6007ff40bee14dd618 (patch) | |
| tree | 891ef7c7dbf6251d7e2e77fd479ac3664dda40ca /ortho/mcode/ortho_code-debug.adb | |
| parent | 8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed (diff) | |
| download | ghdl-06c89bf159a88b4339295b6007ff40bee14dd618.tar.gz ghdl-06c89bf159a88b4339295b6007ff40bee14dd618.tar.bz2 ghdl-06c89bf159a88b4339295b6007ff40bee14dd618.zip | |
bugs fix, 93c improved
Diffstat (limited to 'ortho/mcode/ortho_code-debug.adb')
| -rw-r--r-- | ortho/mcode/ortho_code-debug.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_code-debug.adb b/ortho/mcode/ortho_code-debug.adb index 090298a14..0f3e01ab9 100644 --- a/ortho/mcode/ortho_code-debug.adb +++ b/ortho/mcode/ortho_code-debug.adb @@ -85,6 +85,8 @@ package body Ortho_Code.Debug is Flag_Debug_Stat := True; when 'k' => Flag_Debug_Keep := True; + when 't' => + Flags.Flag_Type_Name := True; when others => Put_Line (Standard_Error, "unknown debug be flag '" & C & "'"); end case; |