Allowed multiple empty dimensions in mobile types, not just one
This commit is contained in:
parent
5534d1c3d6
commit
da43dcb3f5
|
@ -574,7 +574,7 @@ arrayType element
|
|||
specArrayType :: OccParser A.Type -> OccParser A.Type
|
||||
specArrayType element
|
||||
= arrayType element
|
||||
<|> do t <- tryXXV sLeft sRight element
|
||||
<|> do t <- tryXXV sLeft sRight (specArrayType element <|> element)
|
||||
return $ addDimensions [A.UnknownDimension] t
|
||||
|
||||
dataType :: OccParser A.Type
|
||||
|
|
Loading…
Reference in New Issue
Block a user