aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/netlists-dump.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/netlists-dump.adb')
-rw-r--r--src/synth/netlists-dump.adb6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/synth/netlists-dump.adb b/src/synth/netlists-dump.adb
index 7bde0be81..dc1ca9a0c 100644
--- a/src/synth/netlists-dump.adb
+++ b/src/synth/netlists-dump.adb
@@ -470,7 +470,11 @@ package body Netlists.Dump is
Put_Width (W);
Put ("'uh");
V := Get_Param_Uns32 (Inst, 0);
- I := (Natural (W) + 3) / 4;
+ if W >= 32 then
+ I := 8;
+ else
+ I := (Natural (W) + 3) / 4;
+ end if;
while I > 0 loop
I := I - 1;
Put (Xdigits (Shift_Right (V, I * 4) and 15));