Merge branch 'forward-oust-fix', remote-tracking branch 'max19/catfix'

This commit is contained in:
Raymond Pasco 2017-05-17 00:08:08 -04:00
commit 232905333d
2 changed files with 2 additions and 2 deletions

View File

@ -24,7 +24,7 @@
++ pretty-file
=+ wain-to-tang=|=(a/wain (turn a |=(b/cord leaf+(trip b))))
|= fyl/* ^- tang
=+ `(unit wain)`?@(fyl `(to-wain fyl) ((soft wain) fyl))
=+ `(unit wain)`?@(fyl `(to-wain:format fyl) ((soft wain) fyl))
?^ - (wain-to-tang u)
[(pretty-noun fyl)]~
--

View File

@ -386,7 +386,7 @@
++ oust :: remove
~/ %oust
|* {{a/@ b/@} c/(list)}
(weld (scag a c) (slag (add a b) c))
(weld (scag +<-< c) (slag (add +<-< +<->) c))
::
++ reap :: replicate
~/ %reap