Fixing FJSC and ID3
parent
017c57fab1
commit
97dbf32608
|
@ -39,7 +39,7 @@ C: <ast-hashtable> ast-hashtable
|
|||
[ blank? not ] keep
|
||||
[ CHAR: } = not ] keep
|
||||
[ CHAR: ] = not ] keep
|
||||
[ CHAR: ;" = not ] keep
|
||||
[ CHAR: ; = not ] keep
|
||||
[ CHAR: " = not ] keep
|
||||
digit? not
|
||||
and and and and and ;
|
||||
|
@ -48,7 +48,7 @@ MEMO: 'identifier-ends' ( -- parser )
|
|||
[
|
||||
[ blank? not ] keep
|
||||
[ CHAR: " = not ] keep
|
||||
[ CHAR: ;" = not ] keep
|
||||
[ CHAR: ; = not ] keep
|
||||
[ LETTER? not ] keep
|
||||
[ letter? not ] keep
|
||||
identifier-middle? not
|
||||
|
|
|
@ -1,9 +1,8 @@
|
|||
! Copyright (C) 2007 Adam Wendt.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
!
|
||||
|
||||
USING: arrays combinators io io.binary io.files io.paths
|
||||
io.utf16 kernel math math.parser namespaces sequences
|
||||
io.encodings.utf16 kernel math math.parser namespaces sequences
|
||||
splitting strings assocs unicode.categories ;
|
||||
|
||||
IN: id3
|
||||
|
|
Loading…
Reference in New Issue