packages feed

ghc-exactprint-1.9.0.0: tests/examples/pre-ghc910/AltsSemis.hs


foo x =
  case x of
   { ;;; -- leading
     0 -> 'a';  -- case 0
     1 -> 'b'   -- case 1
   ; 2 -> 'c' ; -- case 2
   ; 3 -> 'd'   -- case 3
          ;;;   -- case 4
   }