1# 4m: formatting functions
6Renders a dime `mol` as a cord.
19 ++ scot |=(mol/dime ~(rent co %$ mol))
26 > `@t`(scot %p ~pillyt)
32 > (scot %if .127.0.0.1)
34 > `@t`(scot %if .127.0.0.1)
38 > `@t`(scot %ta ~.asd_a)
48Renders `mol` as a tape.
61 ++ scow |=(mol/dime ~(rend co %$ mol))
70 > (scow %if .127.0.0.1)
82Produces a `gate` that parses a `term` `txt` to an atom of the
83odor specified by `mod`.
91`mod` is a term, an atom of odor `@tas`.
93`txt` is a span, an atom of odor `@ta`.
98 ++ slat |=(mod/@tas |=(txt/@ta (slaw mod txt)))
103 > `(unit @p)`((slat %p) '~pillyt')
105 > `(unit @ux)`((slat %ux) '0x12')
107 > `(unit @if)`((slat %if) '.127.0.0.1')
109 > `(unit @ta)`((slat %ta) '~.asd_a')
117Demand: parse span with input odor
119Parses a span `txt` to an atom of the odor specificed by `mod`. Crashes
120if it failes to parse.
128`mod` is a term, an atom of odor `@tas`.
130`txt` is a span, an atom of odor `@ta`.
135 ++ slav |=([mod/@tas txt/@ta] (need (slaw mod txt)))
140 > `@p`(slav %p '~pillyt')
142 > `@p`(slav %p '~pillam')
144 > `@ux`(slav %ux '0x12')
146 > `@ux`(slav %ux '0b10')
148 > `@if`(slav %if '.127.0.0.1')
150 > `@if`(slav %if '.fe80.0.0.202')
152 > `@ta`(slav %ta '~.asd_a')
154 > `@ta`(slav %ta '~~asd-a')
162Parse span to input odor
164Parses a span `txt` to an atom of the odor specified by `mod`.
172`mod` is a term, an atom of odor `@tas`.
174`txt` is a span, an atom of odor `@ta`.
181 |= {mod/@tas txt/@ta}
184 ?.(&(?=({$~ $$ @ @} con) =(p.p.u.con mod)) ~ [~ q.p.u.con])
190 > `(unit @p)`(slaw %p '~pillyt')
192 > `(unit @p)`(slaw %p '~pillam')
194 > `(unit @ux)`(slaw %ux '0x12')
196 > `(unit @ux)`(slaw %ux '0b10')
198 > `(unit @if)`(slaw %if '.127.0.0.1')
200 > `(unit @if)`(slaw %if '.fe80.0.0.202')
202 > `(unit @ta)`(slaw %ta '~.asd_a')
204 > `(unit @ta)`(slaw %ta '~~asd-a')
214Parses a span `txt` to the unit of a `++coin`.
228 |= txt/@ta ^- (unit coin)
230 ?: (gth 0x7fff.ffff txt) :: XX petty cache
231 ~+ ((full nuck:so) [[1 1] (trip txt)])
232 ((full nuck:so) [[1 1] (trip txt)])
243 [~ [% p=[p=~.p q=32.819]]]
245 [~ [% p=[p=~.ux q=18]]]
246 > (slay '.127.0.0.1')
247 [~ [% p=[p=~.if q=2.130.706.433]]]
250 > (slay '._20_0w25_sam__')
253 p=~[[% p=[p=~.ud q=20]] [% p=[p=~.uw q=133]] [% p=[p=~.tas q=7.168.371]]]
261 ~ <syntax error at [1 2]>
274Renders the path `bon` as a `tank`, which is used for
288 ++ smyt :: pretty print path
290 :+ %rose [['/' ~] ['/' ~] ~]
291 (turn bon |=(a/@ [%leaf (trip a)]))
299 p=[p="/" q="/" r="/"]
303 [%leaf p="~2014.10.28..18.36.58..a280"]
308 p=[p="/" q="/" r="/"]
309 q=~[[%leaf p="as"] [%leaf p="les"] [%leaf p="top"]]
319Renders a path `pax` as cord.
332 ++ spat |=(pax/path (crip (spud pax))) :: path to cord
338 '~zod/try/~2014.10.28..18.40.20..4287'
340 '~zod/try/~2014.10.28..18.41.12..3bcd/bin'
351Renders a path `pax` as tape.
364 ++ spud |=(pax/path ~(ram re (smyt pax))) :: path to tape
370 "~zod/try/~2014.10.28..18.40.46..e951"
372 "~zod/try/~2014.10.28..18.41.05..16f2/bin"
383Parsing rule. Parses a span `zep` to a static `++path`.
394 ++ stab :: parse cord to path
395 =+ fel=;~(pfix fas (more fas urs:ab))
396 |=(zep/@t `path`(rash zep fel))
402 > (stab '/as/lek/tor')
404 > `(pole ,@ta)`(stab '/as/lek/tor')
405 [~.as [~.lek [~.tor ~]]]
406 > (stab '~zod/arvo/~2014.10.28..18.48.41..335f/zuse')
407 ~zod/arvo/~2014.10.28..18.48.41..335f/zuse
408 > `(pole ,@ta)`(stab '~zod/arvo/~2014.10.28..18.48.41..335f/zuse')
409 [~.~zod [~.arvo [~.~2014.10.28..18.48.41..335f [~.zuse ~]]]]
410 > (stab '/a/~pillyt/pals/1')
412 > `(pole ,@ta)`(stab '/a/~pillyt/pals/1')
413 [~.a [~.~pillyt [~.pals [~.1 ~]]]]
keysesc to close
- j k
- move down, up
- enter
- open
- esc
- back, or up a level
- 1 2 3 4
- readme, files, commits, refs
- /
- filter
- y
- copy the clone command
- c
- compare the chosen commit with another (or shift-click both)
- ?
- show or hide this list