about summary refs log blame commit diff
path: root/users/aspen/emacs/snippets/haskell-mode/lens.field
blob: b22ea3d2e888f7ff9cac229e135cb9d7bab8e8e4 (plain) (tree)
1
2
3
4
5
6
7






                                                                                                                                                                                                                                       
# -*- mode: snippet -*-
# name: lens.field
# key: lens
# expand-env: ((yas-indent-line 'fixed))
# --
${1:field} :: Lens' ${2:Source} ${3:Target}
$1 = lens _${4:sourceField} $ \\${2:$(-> yas-text s-word-initials s-downcase)} ${4:$(-> yas-text s-word-initials s-downcase)} -> ${2:$(-> yas-text s-word-initials s-downcase)} { _$4 = ${4:$(-> yas-text s-word-initials s-downcase)} }