diff options
Diffstat (limited to 'gcc/ada/utils.c')
| -rw-r--r-- | gcc/ada/utils.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 1cefff8..8b0bf81 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -2069,7 +2069,11 @@ float_type_for_precision (int precision, enum machine_mode mode) tree gnat_type_for_mode (enum machine_mode mode, int unsignedp) { - if (GET_MODE_CLASS (mode) == MODE_FLOAT) + if (mode == BLKmode) + return NULL_TREE; + else if (mode == VOIDmode) + return void_type_node; + else if (GET_MODE_CLASS (mode) == MODE_FLOAT) return float_type_for_precision (GET_MODE_PRECISION (mode), mode); else return gnat_type_for_size (GET_MODE_BITSIZE (mode), unsignedp); |