factor: fix random errors
parent
783c7307b0
commit
60fde01039
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2009 Doug Coleman.
|
! Copyright (C) 2009 Doug Coleman.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors assocs calendar fry kernel locals parser
|
USING: accessors assocs calendar fry kernel locals parser
|
||||||
sequences vocabs words memoize ;
|
sequences vocabs words memoize lexer ;
|
||||||
IN: calendar.holidays
|
IN: calendar.holidays
|
||||||
|
|
||||||
SINGLETONS: all world commonwealth-of-nations ;
|
SINGLETONS: all world commonwealth-of-nations ;
|
||||||
|
|
|
@ -6,7 +6,7 @@ ARTICLE: "etags" "Etags file"
|
||||||
{ $subsections
|
{ $subsections
|
||||||
etags
|
etags
|
||||||
write-etags
|
write-etags
|
||||||
}
|
} ;
|
||||||
|
|
||||||
HELP: write-etags
|
HELP: write-etags
|
||||||
{ $values { "path" string } }
|
{ $values { "path" string } }
|
||||||
|
|
|
@ -81,7 +81,7 @@ M: irc-message set-irc-command
|
||||||
[ prefix>> ]
|
[ prefix>> ]
|
||||||
[ command>> ]
|
[ command>> ]
|
||||||
[ parameters>> " " join ]
|
[ parameters>> " " join ]
|
||||||
[ trailing>> dup [ char: \ : prefix ] when ]
|
[ trailing>> dup [ char: \: prefix ] when ]
|
||||||
} cleave 4array sift " " join ;
|
} cleave 4array sift " " join ;
|
||||||
|
|
||||||
PRIVATE<
|
PRIVATE<
|
||||||
|
|
Loading…
Reference in New Issue