Correctly hand-merge e3e0a7f.

This commit is contained in:
C. Guy Yarvin 2017-12-01 15:54:50 -08:00
parent db4a6008be
commit 37ca298f88

View File

@ -752,9 +752,9 @@
|%
++ case
%+ sear
|= a/coin
?. ?=({$$ ?($da $ud $tas) *} a) ~
[~ u=(^case a)]
|= a/coin ^- (unit ^case)
?. ?=({$$ ^case} a) ~
[~ u=p.a]
nuck:so
::
++ mota ;~(pfix pat mota:vez) :: atom odor