ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

Removed 2eF comments

Browse Source
This commit is contained in:
Anton Dyudin 2014-10-27 15:12:02 -07:00 committed by Anton Dyudin
parent 071ac7c460
commit b26deda123
1 changed files with 38 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

77
arvo/hoon.hoon
View File

@ -2721,39 +2721,39 @@
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: section 2eF, parsing (ascii) :: :: section 2eF, parsing (ascii) ::
:: ::
++ ace (just ' ') :: spACE ++ ace (just ' ')
++ bar (just '|') :: vertical BAR ++ bar (just '|')
++ bas (just '\\') :: Back Slash (escaped) ++ bas (just '\\')
++ buc (just '$') :: dollars BUCks ++ buc (just '$')
++ cab (just '_') :: CABoose ++ cab (just '_')
++ cen (just '%') :: perCENt ++ cen (just '%')
++ col (just ':') :: COLon ++ col (just ':')
++ com (just ',') :: COMma ++ com (just ',')
++ doq (just '"') :: Double Quote ++ doq (just '"')
++ dot (just '.') :: dot dot dot ... ++ dot (just '.')
++ fas (just '/') :: Forward Slash ++ fas (just '/')
++ gal (just '<') :: Greater Left ++ gal (just '<')
++ gar (just '>') :: Greater Right ++ gar (just '>')
++ hax (just '#') :: Hash ++ hax (just '#')
++ kel (just '{') :: Curly Left ++ kel (just '{')
++ ker (just '}') :: Curly Right ++ ker (just '}')
++ ket (just '^') :: CareT ++ ket (just '^')
++ lus (just '+') :: pLUS ++ lus (just '+')
++ hep (just '-') :: HyPhen ++ hep (just '-')
++ pel (just '(') :: Paren Left ++ pel (just '(')
++ pam (just '&') :: AMPersand pampersand ++ pam (just '&')
++ per (just ')') :: Paren Right ++ per (just ')')
++ pat (just '@') :: AT pat ++ pat (just '@')
++ sel (just '[') :: Square Left ++ sel (just '[')
++ sem (just ';') :: SEMicolon ++ sem (just ';')
++ ser (just ']') :: Square Right ++ ser (just ']')
++ sig (just '~') :: SIGnature squiggle ++ sig (just '~')
++ soq (just '\'') :: Single Quote ++ soq (just '\'')
++ tar (just '*') :: sTAR ++ tar (just '*')
++ tec (just '`') :: backTiCk ++ tec (just '`')
++ tis (just '=') :: 'tis tis, it is ++ tis (just '=')
++ wut (just '?') :: wut, what? ++ wut (just '?')
++ zap (just '!') :: zap! bang! crash!! ++ zap (just '!')
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: section 2eG, parsing (whitespace) :: :: section 2eG, parsing (whitespace) ::
:: ::
@ -3684,7 +3684,6 @@
[~ p.u.q.foo] [~ p.u.q.foo]
:: ::
++ rags :: rege parsers ++ rags :: rege parsers
!:
=> |% => |%
++ nor ;~(less (mask "^$()|*?+.[\\") (shim 1 127)) :: non-control char ++ nor ;~(less (mask "^$()|*?+.[\\") (shim 1 127)) :: non-control char
++ les ;~(less bas asp) :: not backslash ++ les ;~(less bas asp) :: not backslash
@ -4150,7 +4149,7 @@
++ xaro |=([a=@ b=@] +((mod (add (dec b) (sub 255 (mod a 255))) 255))) ++ xaro |=([a=@ b=@] +((mod (add (dec b) (sub 255 (mod a 255))) 255)))
:: ::
++ zaft :: forward 255-sbox ++ zaft :: forward 255-sbox
|= a=@ |= a=@D
=+ ^= b =+ ^= b
0xcc.75bc.86c8.2fb1.9a42.f0b3.79a0.92ca.21f6.1e41.cde5.fcc0. 0xcc.75bc.86c8.2fb1.9a42.f0b3.79a0.92ca.21f6.1e41.cde5.fcc0.
7e85.51ae.1005.c72d.1246.07e8.7c64.a914.8d69.d9f4.59c2.8038. 7e85.51ae.1005.c72d.1246.07e8.7c64.a914.8d69.d9f4.59c2.8038.
@ -4166,7 +4165,7 @@
(cut 3 [(dec a) 1] b) (cut 3 [(dec a) 1] b)
:: ::
++ zart :: reverse 255-sbox ++ zart :: reverse 255-sbox
|= a=@ |= a=@D
=+ ^= b =+ ^= b
0x68.4f07.ea1c.73c9.75c2.efc8.d559.5125.f621.a7a8.8591.5613. 0x68.4f07.ea1c.73c9.75c2.efc8.d559.5125.f621.a7a8.8591.5613.
dd52.40eb.65a2.60b7.4bcb.1123.ceb0.1bd6.3c84.2906.b164.19b3. dd52.40eb.65a2.60b7.4bcb.1123.ceb0.1bd6.3c84.2906.b164.19b3.
@ -4182,7 +4181,7 @@
(cut 3 [(dec a) 1] b) (cut 3 [(dec a) 1] b)
:: ::
++ zyft :: forward 256-sbox ++ zyft :: forward 256-sbox
|= a=@ |= a=@D
=+ ^= b =+ ^= b
0xbb49.b71f.b881.b402.17e4.6b86.69b5.1647.115f.dddb.7ca5. 0xbb49.b71f.b881.b402.17e4.6b86.69b5.1647.115f.dddb.7ca5.
8371.4bd5.19a9.b092.605d.0d9b.e030.a0cc.78ba.5706.4d2d. 8371.4bd5.19a9.b092.605d.0d9b.e030.a0cc.78ba.5706.4d2d.
@ -4199,7 +4198,7 @@
(cut 3 [a 1] b) (cut 3 [a 1] b)
:: ::
++ zyrt :: reverse 256-sbox ++ zyrt :: reverse 256-sbox
|= a=@ |= a=@D
=+ ^= b =+ ^= b
0x9fc8.2753.6e02.8fcf.8b35.2b20.5598.7caa.c9a9.30b0.9b48. 0x9fc8.2753.6e02.8fcf.8b35.2b20.5598.7caa.c9a9.30b0.9b48.
47ce.6371.80f6.407d.00dd.0aa5.ed10.ecb7.0f5a.5c3a.e605. 47ce.6371.80f6.407d.00dd.0aa5.ed10.ecb7.0f5a.5c3a.e605.
@ -4727,7 +4726,7 @@
?: =((mul 100 a) d) ?: =((mul 100 a) d)
~|(%ar-ramp !!) ~|(%ar-ramp !!)
=+ e=(~(raw og c) a) =+ e=(~(raw og c) a)
?: &(|-(?~(b & &(!=(1 (mod e i.b)) $(b +.b)))) (pram e)) ?: &((levy b |=(f=@ !=(1 (mod e f)))) (pram e))
e e
$(c +(c), d (shax d)) $(c +(c), d (shax d))
:: ::