8 lines
142 B
Text
8 lines
142 B
Text
|
# key: gen
|
||
|
|
# name: Hedgehog Generator
|
||
|
|
# expand-env: ((yas-indent-line (quote fixed)))
|
||
|
|
# --
|
||
|
|
gen${1:Foo} :: Gen $1
|
||
|
|
gen$1 = do
|
||
|
|
$2
|
||
|
|
pure $1{..}
|