ghc-exactprint-1.14.0.0: tests/examples/ghc910/Cfipu.hs
{-# LANGUAGE ScopedTypeVariables, FlexibleContexts #-}
module Main where
instructions =
[ ('2', \m r -> do
r m
; `catch` get m r)
]
{-# LANGUAGE ScopedTypeVariables, FlexibleContexts #-}
module Main where
instructions =
[ ('2', \m r -> do
r m
; `catch` get m r)
]