diff options
| author | Tristan Gingold | 2014-09-03 04:41:55 +0200 |
|---|---|---|
| committer | Tristan Gingold | 2014-09-03 04:41:55 +0200 |
| commit | 6d8c5299f20b4cd8f1e049f7eea454c00a3102b7 (patch) | |
| tree | e06fd1ab55f2398d2e121ad6d7a7b3236aaeda6b /simulate/debugger.adb | |
| parent | e6ffb98cb5ad3f07bcaf79323d8ab8411688c494 (diff) | |
| download | ghdl-6d8c5299f20b4cd8f1e049f7eea454c00a3102b7.tar.gz ghdl-6d8c5299f20b4cd8f1e049f7eea454c00a3102b7.tar.bz2 ghdl-6d8c5299f20b4cd8f1e049f7eea454c00a3102b7.zip | |
Fix ghdl_simul (after previous change).
Diffstat (limited to 'simulate/debugger.adb')
| -rw-r--r-- | simulate/debugger.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/simulate/debugger.adb b/simulate/debugger.adb index 072fba6..1677efa 100644 --- a/simulate/debugger.adb +++ b/simulate/debugger.adb @@ -1298,7 +1298,7 @@ package body Debugger is Add_Declarations (Get_Declaration_Chain (N), False); when Iir_Kind_For_Loop_Statement => Open_Declarative_Region; - Add_Name (Get_Iterator_Scheme (N)); + Add_Name (Get_Parameter_Specification (N)); when Iir_Kind_Block_Statement => Open_Declarative_Region; Add_Declarations (Get_Declaration_Chain (N), False); |