From 22072f46b1196ff8c8fb716f7650f9afc0904a03 Mon Sep 17 00:00:00 2001
From: Tom Smeding <t.j.smeding@uu.nl>
Date: Wed, 3 Apr 2024 14:41:59 +0200
Subject: Fix fixities

---
 src/Data/Array/Nested/Internal.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/Data/Array/Nested/Internal.hs')

diff --git a/src/Data/Array/Nested/Internal.hs b/src/Data/Array/Nested/Internal.hs
index 1139c57..892f4d8 100644
--- a/src/Data/Array/Nested/Internal.hs
+++ b/src/Data/Array/Nested/Internal.hs
@@ -510,6 +510,7 @@ type IxR :: Nat -> Type
 data IxR n where
   IZR :: IxR Z
   (:::) :: Int -> IxR n -> IxR (S n)
+infixr 5 :::
 
 ixCvtXR :: IxX sh -> IxR (X.Rank sh)
 ixCvtXR IZX = IZR
@@ -573,6 +574,7 @@ type IxS :: [Nat] -> Type
 data IxS sh where
   IZS :: IxS '[]
   (::$) :: Int -> IxS sh -> IxS (n : sh)
+infixr 5 ::$
 
 cvtSShapeIxS :: SShape sh -> IxS sh
 cvtSShapeIxS ShNil = IZS
-- 
cgit v1.2.3-70-g09d2