File tree Expand file tree Collapse file tree 12 files changed +63
-0
lines changed Expand file tree Collapse file tree 12 files changed +63
-0
lines changed Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (case ... [... ...]...)
3+ # key : case
4+ # --
5+ (case ${ 1 :expression } [${ 2 :datum } $0 ])
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (case-lambda [... ...]...)
3+ # key : case-lambda
4+ # --
5+ (case-lambda [${ 1 :arguments } $0 ])
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (cond [... ...]...)
3+ # key : cond
4+ # --
5+ (cond [${ 1 :predicate } $0 ])
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (define ... ...)
3+ # key : define
4+ # --
5+ (define ${ 1 :(${ 2 :name } ${ 3 :arguments } ) } $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (do ([... ... ...]...) (... ...) ...)
3+ # key : do
4+ # --
5+ (do ([${ 1 :name } ${ 2 :init } ${ 3 :step } ]$4 )
6+ (${ 5 :stop-predicate } ${ 6 :finish } )
7+ $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (for... (...) ...)
3+ # key : for
4+ # --
5+ (for$1 (${ 2 :for-clause } ) $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (if ... ... ...)
3+ # key : if
4+ # --
5+ (if ${ 1 :(${ 2 :predicate } ) }
6+ $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (lambda (...) ...)
3+ # key : lambda
4+ # --
5+ (lambda ${ 1 :(${ 2 :arguments } ) } $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (let... ([... ...]...) ...)
3+ # key : let
4+ # --
5+ (let$1 ([${ 2 :name } ${ 3 :expression } ]$4 ) $0 )
Original file line number Diff line number Diff line change 1+ # -*- mode : snippet -*-
2+ # name : (match ... [... ...]...)
3+ # key : match
4+ # --
5+ (match ${ 1 :expression } [${ 2 :clause } $0 ])
You can’t perform that action at this time.
0 commit comments