fix +* spec parameter bunts (default to identity)
%+ cook
|= [b=term c=(list term) e=spec]
^- [term hoon]
- :* b
+ :- b
:+ %brtr
:- %bscl
=- ?>(?=(^ -) -)
%+ turn c
|= =term
^- spec
- :+ %bsts
- term
- [%bshp [%base %noun] [%base %noun]]
- :- %ktcl
- :+ %made
- [b c]
- e
- ==
+ =/ tar [%base %noun]
+ :+ %bsts term
+ :+ %bssg [%brts tar $/6]
+ [%bshp tar tar]
+ [%ktcl [%made [b c] e]]
;~ pfix (jest '+*')
;~ plug
;~(pfix gap sym)
