@ -67,6 +67,7 @@ differences in implementation between systems. Used in place of
( defmacro def-example-group ( name doc &rest examples )
( defmacro def-example-group ( name doc &rest examples )
" Define a group with NAME and DOC of EXAMPLES of several functions.
" Define a group with NAME and DOC of EXAMPLES of several functions.
See ` dash--groups '. "
See ` dash--groups '. "
( declare ( indent defun ) )
` ( progn
` ( progn
( push ( cons , name , doc ) dash--groups )
( push ( cons , name , doc ) dash--groups )
,@ examples ) )
,@ examples ) )
@ -74,6 +75,7 @@ See `dash--groups'."
( defmacro defexamples ( fn &rest examples )
( defmacro defexamples ( fn &rest examples )
" Define a set of EXAMPLES and corresponding ERT tests for FN.
" Define a set of EXAMPLES and corresponding ERT tests for FN.
See ` dash--groups '. "
See ` dash--groups '. "
( declare ( indent defun ) )
( setq examples ( -partition 3 examples ) )
( setq examples ( -partition 3 examples ) )
` ( progn
` ( progn
( push ( cons ',fn ',examples ) dash--groups )
( push ( cons ',fn ',examples ) dash--groups )