]> gitweb.factorcode.org Git - factor.git/commitdiff
basis: rename the only four words with backtick in their name.
authorDoug Coleman <doug.coleman@gmail.com>
Mon, 21 Mar 2016 04:03:44 +0000 (21:03 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Mon, 21 Mar 2016 04:04:30 +0000 (21:04 -0700)
basis/classes/struct/struct.factor
basis/regexp/regexp.factor

index 744c961452ef3d90b302dae81b27a71724840b67..0d14fa12cc0fc4a41c2dddbd818e5adc00eca363 100644 (file)
@@ -397,17 +397,17 @@ SYNTAX: S@
 ! functor support
 
 <PRIVATE
-: scan-c-type` ( -- c-type/param )
+: scan-c-type* ( -- c-type/param )
     scan-token dup "{" = [ drop \ } parse-until >array ] [ search ] if ;
 
-: parse-struct-slot` ( accum -- accum )
-    scan-string-param scan-c-type` \ } parse-until
+: parse-struct-slot* ( accum -- accum )
+    scan-string-param scan-c-type* \ } parse-until
     [ <struct-slot-spec> suffix! ] 3curry append! ;
 
-: parse-struct-slots` ( accum -- accum more? )
+: parse-struct-slots* ( accum -- accum more? )
     scan-token {
         { ";" [ f ] }
-        { "{" [ parse-struct-slot` t ] }
+        { "{" [ parse-struct-slot* t ] }
         [ invalid-struct-slot ]
     } case ;
 
@@ -416,7 +416,7 @@ PRIVATE>
 FUNCTOR-SYNTAX: STRUCT:
     scan-param suffix!
     [ 8 <vector> ] append!
-    [ parse-struct-slots` ] [ ] while
+    [ parse-struct-slots* ] [ ] while
     [ >array define-struct-class ] append! ;
 
 { "classes.struct" "prettyprint" } "classes.struct.prettyprint" require-when
index 699c61e4c6c9bbdf991f568259494ba9bfe2dfb4..6c7699bce3b54135ba86cccdeacd51b79b727846 100644 (file)
@@ -207,7 +207,6 @@ PRIVATE>
         { "R' "  "'"  }
         { "R( "  ")"  }
         { "R@ "  "@"  }
-        { "R` "  "`"  }
         { "R| "  "|"  }
     } swap [ subseq? not nip ] curry assoc-find drop ;
 
@@ -233,7 +232,6 @@ SYNTAX: R' CHAR: ' parsing-regexp ;
 SYNTAX: R( CHAR: ) parsing-regexp ;
 SYNTAX: R/ CHAR: / parsing-regexp ;
 SYNTAX: R@ CHAR: @ parsing-regexp ;
-SYNTAX: R` CHAR: ` parsing-regexp ;
 SYNTAX: R| CHAR: | parsing-regexp ;
 
 USE: vocabs.loader