2title = "4l: Atom Parsing"
11Core containing arms that parse atoms encoded in strings.
27Parsing `rule`. Parses an `@u` of any permitted base,
38 (stag %ub ;~(pfix (just 'b') bay:ag))
39 (stag %uc ;~(pfix (just 'c') fim:ag))
40 (stag %ui ;~(pfix (just 'i') dim:ag))
41 (stag %ux ;~(pfix (just 'x') hex:ag))
42 (stag %uv ;~(pfix (just 'v') viz:ag))
43 (stag %uw ;~(pfix (just 'w') wiz:ag))
56> (scan "0x12.6401" bisk:so)
64Parse `@da`, `@dr`, `@p`, `@t`
66Parsing `rule`. Parses any atom of any of the following auras after a leading
67sig: `@da`, `@dr`, `@p`, and `@t`. Produces a `dime`.
75 (cook |=(det=date `dime`[%da (year det)]) when)
78 |= [a=(list [p=?(%d %h %m %s) q=@]) b=(list @)]
79 =+ rop=`tarp`[0 0 0 0 b]
84 %d $(a t.a, d.rop (add q.i.a d.rop))
85 %h $(a t.a, h.rop (add q.i.a h.rop))
86 %m $(a t.a, m.rop (add q.i.a m.rop))
87 %s $(a t.a, s.rop (add q.i.a s.rop))
93 ;~(pfix (just 'd') (stag %d dim:ag))
94 ;~(pfix (just 'h') (stag %h dim:ag))
95 ;~(pfix (just 'm') (stag %m dim:ag))
96 ;~(pfix (just 's') (stag %s dim:ag))
98 ;~(pose ;~(pfix ;~(plug dot dot) (most dot qix:ab)) (easy ~))
102 ;~(pfix dot (stag %ta urs:ab))
103 ;~(pfix sig (stag %t urx:ab))
104 ;~(pfix hep (stag %c (cook taft urx:ab)))
111> (scan "1926.5.12" crub:so)
112[p=~.da q=170.141.184.449.747.016.871.285.095.307.149.312.000]
114> ;;([%da @da] (scan "1926.5.12" crub:so))
117> (scan "s10" crub:so)
118[p=~.dr q=184.467.440.737.095.516.160]
120> ;;([%dr @dr] (scan "s10" crub:so))
123> (scan "sampel" crub:so)
126> (scan ".mas" crub:so)
136Parsing `rule`. Switches on the first character and applies the
137corresponding `coin` parser.
143 ~/ %nuck |= a=nail %. a
147 :~ :- ['a' 'z'] (cook |=(a=@ta [%$ %tas a]) sym)
148 :- ['0' '9'] (stag %$ bisk)
149 :- '-' (stag %$ tash)
150 :- '.' ;~(pfix dot perd)
151 :- '~' ;~(pfix sig ;~(pose twid (easy [%$ %n 0])))
158> (scan "~pillyt" nuck:so)
159[%$ p=[p=~.p q=13.184]]
161> (scan "0x12" nuck:so)
164> (scan ".127.0.0.1" nuck:so)
165[%$ p=[p=~.if q=2.130.706.433]]
167> (scan "._20_0w25_sam__" nuck:so)
172 [%$ p=[p=~.uw q=133]]
173 [%$ p=[p=~.tas q=7.168.371]]
182Parse coin literal with escapes
184Parsing `rule`. Parses a coin literal with escapes.
191 :(sear |=(a=@ta (rush a nuck)) wick urt:ab)
203> (scan "~~.asd~-a" nusk:so)
204[%$ p=[p=~.ta q=418.212.246.369]]
211Parsing coin literal without prefixes
213Parsing `rule`. Parses a dime or tuple without their respective standard
223 (stag %many (ifix [cab ;~(plug cab cab)] (more cab nusk)))
236> (scan "_20_x__" perd:so)
237[%many [[%$ p=[p=~.ud q=20]] [i=[%$ p=[p=~.tas q=120]] t=~]]]
246Parsing `rule`. Parses a number into a `dime` float.
264> (scan "~3.14" royl:so)
267> (scan "3.14" royl:so)
275Parse half-precision float
277Parsing `rule`. Parses a `@rh`.
282++ royl-rh (cook rylh ;~(pfix ;~(plug sig sig) (cook royl-cell royl-rn)))
288> (scan "~~3.14" royl-rh:so)
296Parse quad-precision float
298Parsing `rule`. Parses a `@rq`.
303++ royl-rq (cook rylq ;~(pfix ;~(plug sig sig sig) (cook royl-cell royl-rn)))
309> (scan "~~~3.14" royl-rq:so)
317Parse double-precision float
319Parsing `rule`. Parses a `@rd`.
324++ royl-rd (cook ryld ;~(pfix sig (cook royl-cell royl-rn)))
330> (scan "~3.14" royl-rd:so)
338Parse single-precision float
340Parsing `rule`. Parses a `@rs`.
345++ royl-rs (cook ryls (cook royl-cell royl-rn))
351> (scan "3.14" royl-rs:so)
361Parsing `rule`. Parses a real number to a [`++rn`](/docs/hoon/reference/stdlib/3b#rn).
370 (scan a (bass 10 (plus sid:ab)))
374 ;~(pose (cold | hep) (easy &))
377 ;~(pfix dot (cook moo (plus (shim '0' '9'))))
383 ;~(plug ;~(pose (cold | hep) (easy &)) dim:ag)
393 ;~(pose (cold | hep) (easy &))
400 (cold ~ (jest 'nan'))
408> (scan "3.14" royl-rn:so)
409[%d %.y 3 [2 14] [%.y 0]]
411> (scan "-3.14e-39" royl-rn:so)
412[%d %.n 3 [2 14] [%.n 39]]
414> (scan "3" royl-rn:so)
415[%d %.y 3 [0 0] [%.y 0]]
424Intermediate parsed float converter. Convert a
425[`++rn`](/docs/hoon/reference/stdlib/3b#rn) to
426[`++dn`](/docs/hoon/reference/stdlib/3b#dn).
444 (dif:si (new:si f.b i.b) (sun:si d.b))
445 [%d a h (add (mul c.b (pow 10 d.b)) e.b)]
451> (royl-cell:so (scan "3.14" royl-rn:so))
454> (ryls (royl-cell:so (scan "3.14" royl-rn:so)))
464Parsing `rule`. Parse a `@s` to a `dime`.
472 |= [syn=? mol=dime] ^- dime
473 ?> =('u' (end 3 p.mol))
474 [(cat 3 's' (rsh 3 p.mol)) (new:si syn q.mol)]
477 (cook |=(a=dime (neg | a)) bisk)
478 ;~(pfix hep (cook |=(a=dime (neg & a)) bisk))
486> (scan "-20" tash:so)
489> ;;([%sd @sd] (scan "-20" tash:so))
492> ;;([%sd @sd] (scan "--20" tash:so))
495> ;;([%sx @sx] (scan "--0x2e" tash:so))
503Parse coins without `~` prefix
505Parsing rule. Parses coins after a leading sig, `~`.
514 %+ sear |=(a=@ (mole |.((cue a))))
515 ;~(pfix (just '0') vum:ag)
524> (scan "zod" twid:so)
527> (scan ".sam" twid:so)
530> (scan "0ph" twid:so)
540Parsing `rule`. Parse a `@da`-formatted date string (sans the leading `~`) to a
551 ;~(plug dim:ag ;~(pose (cold | hep) (easy &)))
552 ;~(pfix dot mot:ag) :: month
553 ;~(pfix dot dip:ag) :: day
561 ;~(pose ;~(pfix ;~(plug dot dot) (most dot qix:ab)) (easy ~))
572> `date`(scan "2000.1.1..12.00.00..ffff" when:so)
573[[a=%.y y=2.000] m=1 t=[d=1 h=12 m=0 s=0 f=~[0xffff]]]
580Parse dimes from `@i`, `@f`, `@r` or `@q`
582Parsing rule. Parses an atom of either `@if` (IP address), `@f` (loobean), `@r`
583(floating point) into a `dime`. The `@q` alone requires a leading `~`.
594 (stag %f ;~(pose (cold & (just 'y')) (cold | (just 'n'))))
595 (stag %q ;~(pfix sig feq:ag))
602> (scan "~sampel" zust:so)
608> (scan "127.0.0.1" zust:so)
611> (scan "af.0.0.0.0.e7a5.30d2.7" zust:so)
612[%is 908.651.950.243.594.834.993.091.554.288.205.831]
614> (scan "12.09" zust:so)
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