Skip to content

Instantly share code, notes, and snippets.

@m0ar

m0ar/asså.hs

Created April 10, 2018 12:24
Show Gist options
  • Save m0ar/a6b1ebba63ff3d8a06159ddf4f97c362 to your computer and use it in GitHub Desktop.
Save m0ar/a6b1ebba63ff3d8a06159ddf4f97c362 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
asså.hs
-- Funkar ej
bindpat '<-' exp maybeweight {% (ams (sLL $1 $> $ mkBindStmt $1 $3)
[mu AnnLarrow $2]) >>= aw $4 }
-- Funkar
bindpat '<-' exp maybeweight {% (ams (sLL $1 $3 $ mkBindStmt $1 $3)
[mu AnnLarrow $2]) >>= aw $4 }
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment