15 lines
277 B
Agda
15 lines
277 B
Agda
module ErrMsg
|
|
|
|
import Prelude
|
|
|
|
infixl 5 _$$_
|
|
|
|
_$$_ : Nat → (Nat → Nat) → Nat
|
|
a $$ b = a + b a
|
|
|
|
-- Say something other than expected record
|
|
-- Why do we get there? shouldn't the progress made by parseDef short circuit the <|>?
|
|
blah : Nat → Nat
|
|
blah x = x $$ $ \ y => y
|
|
|