finishes symbol renaming (fas->net) in mar/ and lib/

This commit is contained in:
Joe Bryan 2018-08-03 14:01:48 -04:00
parent bf966691fa
commit 66bc5cdc4c
4 changed files with 7 additions and 7 deletions

View File

@ -503,8 +503,8 @@
%+ stag %html
;~ plug gal
;~ pose
;~(plug blo ;~(pose fas gar gah))
;~(plug fas blo ;~(pose gar gah))
;~(plug blo ;~(pose net gar gah))
;~(plug net blo ;~(pose gar gah))
(mask "?!")
==
==

View File

@ -29,10 +29,10 @@
++ de-tape ::: tape to sur (parse)
|%
++ circ ::: circle
;~((glue fas) ;~(pfix sig fed:ag) urs:ab)
;~((glue net) ;~(pfix sig fed:ag) urs:ab)
::
++ pont
;~ pfix fas
;~ pfix net
%+ sear
|= a/coin
^- (unit place)

View File

@ -35,7 +35,7 @@
%- su
;~ plug
sym
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
;~(pfix col (more net (cook crip (star ;~(less net prn)))))
==
listen-api+(su ;~(plug sym ;~(pfix col sym)))
as+(ot mark+(su sym) next+source ~)
@ -53,7 +53,7 @@
%- su
;~ plug
sym
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
;~(pfix col (more net (cook crip (star ;~(less net prn)))))
==
command+so:jo
app+(su sym)

View File

@ -71,7 +71,7 @@
++ string-number
%+ cook
|=(a=tape a)
(star ;~(pose nud fas hep))
(star ;~(pose nud net hep))
::
--
--