steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

minor cleanup.

db4
John Benediktsson 2015-08-17 20:32:28 -07:00
parent 399d01f56e
commit e8cc383388
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/peg/ebnf/ebnf.factor
View File

@ -31,7 +31,7 @@ TUPLE: tokenizer-tuple any one many ;
: parser-tokenizer ( parser -- tokenizer )
[ 1quotation ] keep
[ swap [ = ] curry semantic ] curry dup \ tokenizer-tuple boa ;
[ swap [ = ] curry semantic ] curry dup tokenizer-tuple boa ;
: rule-tokenizer ( name word -- tokenizer )
rule parser-tokenizer ;

2
basis/urls/urls.factor
View File

@ -43,7 +43,7 @@ M: url >url ;
EBNF: parse-url
protocol = [a-z+]+ => [[ url-decode ]]
protocol = [a-z+]+ => [[ url-decode ]]
username = [^/:@#?]+ => [[ url-decode ]]
password = [^/:@#?]+ => [[ url-decode ]]
pathname = [^#?]+ => [[ url-decode ]]