diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-11-16 04:43:41 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-11-16 05:11:39 +0100 |
| commit | 7414046cc73ecc16bfa2ce3af3cb529195ce120f (patch) | |
| tree | 97adafa9b32725c2e92b280f005ff31da38655d6 /src/ortho/mcode/ortho_code-x86-emits.adb | |
| parent | 9a8b35ac990386252bfb4e65f76acaa739d7967c (diff) | |
| download | ghdl-7414046cc73ecc16bfa2ce3af3cb529195ce120f.tar.gz ghdl-7414046cc73ecc16bfa2ce3af3cb529195ce120f.tar.bz2 ghdl-7414046cc73ecc16bfa2ce3af3cb529195ce120f.zip | |
mcode: add new_default_value.
Diffstat (limited to 'src/ortho/mcode/ortho_code-x86-emits.adb')
| -rw-r--r-- | src/ortho/mcode/ortho_code-x86-emits.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/ortho/mcode/ortho_code-x86-emits.adb b/src/ortho/mcode/ortho_code-x86-emits.adb index 48590af97..9e73b2dab 100644 --- a/src/ortho/mcode/ortho_code-x86-emits.adb +++ b/src/ortho/mcode/ortho_code-x86-emits.adb @@ -3183,6 +3183,10 @@ package body Ortho_Code.X86.Emits is Emit_Const (E); end loop; end; + when OC_Zero => + for I in 1 .. Get_Type_Size (Get_Const_Type (Val)) loop + Gen_8 (0); + end loop; when OC_Sizeof | OC_Alignof | OC_Union => |