Index: gcc/gcc/config/arm/neon-docgen.ml |
diff --git a/gcc/gcc/config/arm/neon-docgen.ml b/gcc/gcc/config/arm/neon-docgen.ml |
index b4802fdd24048b2d10de3b740a72b078bf2e0e07..23e37b49809fd3e2d94c4683faf32b1bcbf38afc 100644 |
--- a/gcc/gcc/config/arm/neon-docgen.ml |
+++ b/gcc/gcc/config/arm/neon-docgen.ml |
@@ -214,6 +214,7 @@ let rec analyze_shape shape = |
| Element_of_dreg -> (analyze_shape_elt reg_no Dreg) ^ "[@var{0}]" |
| Element_of_qreg -> (analyze_shape_elt reg_no Qreg) ^ "[@var{0}]" |
| All_elements_of_dreg -> (analyze_shape_elt reg_no Dreg) ^ "[]" |
+ | Alternatives alts -> (analyze_shape_elt reg_no (List.hd alts)) |
in |
match shape with |
All (n, elt) -> commas (analyze_shape_elt 0) (n_things n elt) "" |