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

core: Add factor[[ ]] and <factor> to hold Factor strings.

modern-harvey3-triple
Doug Coleman 2018-08-04 09:47:47 -04:00
parent 24929aadf1
commit e6715f41a5
4 changed files with 25 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
core/bootstrap/syntax.factor
View File

@ -127,6 +127,14 @@ IN: bootstrap.syntax
"[=====["
"[======["
"factor[["
"factor[=["
"factor[==["
"factor[===["
"factor[====["
"factor[=====["
"factor[======["
"![["
"![=["
"![==["

1
core/factor/authors.txt Normal file
View File

@ -0,0 +1 @@
Doug Coleman

6
core/factor/factor.factor Normal file
View File

@ -0,0 +1,6 @@
! Copyright (C) 2018 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
IN: factor
TUPLE: factor text ;
C: <factor> factor

12
core/syntax/syntax.factor
View File

@ -5,8 +5,8 @@ classes.algebra.private classes.builtin classes.error
classes.intersection classes.maybe classes.mixin classes.parser
classes.predicate classes.singleton classes.tuple
classes.tuple.parser classes.union combinators compiler.units
definitions delegate delegate.private effects effects.parser fry
functors2 generic generic.hook generic.math generic.parser
definitions delegate delegate.private effects effects.parser factor
fry functors2 generic generic.hook generic.math generic.parser
generic.standard hash-sets hashtables hashtables.identity hints
init interpolate io.pathnames kernel lexer locals.errors
locals.parser locals.types macros math memoize multiline
@ -396,6 +396,14 @@ IN: bootstrap.syntax
{ "_" "@" } define-fry-specifiers
"factor[[" [ "]]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[=[" [ "]=]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[==[" [ "]==]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[===[" [ "]===]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[====[" [ "]====]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[=====[" [ "]=====]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"factor[======[" [ "]======]" parse-multiline-string0 <factor> suffix! ] define-core-syntax
"[[" [ "]]" parse-multiline-string0 suffix! ] define-core-syntax
"[=[" [ "]=]" parse-multiline-string0 suffix! ] define-core-syntax
"[==[" [ "]==]" parse-multiline-string0 suffix! ] define-core-syntax