Keep Arrows on older ghcs

cchalmers · Nov 16, 2023 · af21d50 · af21d50
1 parent 3d5991a
commit af21d50
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/example/Testing.hs b/example/Testing.hs
@@ -10,6 +10,10 @@
 For testing the circuit notation.
 -}
 
+{-# LANGUAGE CPP            #-}
+#if __GLASGOW_HASKELL__ <= 902
+{-# LANGUAGE Arrows            #-}
+#endif
 {-# LANGUAGE BlockArguments            #-}
 {-# LANGUAGE GADTs                     #-}
 -- {-# LANGUAGE NoMonomorphismRestriction #-}