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

tools.scaffold: revert previous commit.

windows-high-dpi
John Benediktsson 2018-02-24 18:01:55 -08:00
parent b7d763a6e0
commit c48d3da8b5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/tools/scaffold/scaffold.factor
View File

@ -14,7 +14,7 @@ SYMBOL: using
ERROR: not-a-vocab-root string ; ERROR: not-a-vocab-root string ;
ERROR: vocab-must-not-exist name root ; ERROR: vocab-must-not-exist string ;
<PRIVATE <PRIVATE
@ -31,7 +31,7 @@ ERROR: vocab-must-not-exist name root ;
[ check-root ] [ check-vocab-name ] bi* ; [ check-root ] [ check-vocab-name ] bi* ;
: check-vocab-exists ( string -- string ) : check-vocab-exists ( string -- string )
dup vocab-exists? [ dup find-vocab-root vocab-must-not-exist ] when ; dup vocab-exists? [ vocab-must-not-exist ] when ;
: replace-vocab-separators ( vocab -- path ) : replace-vocab-separators ( vocab -- path )
path-separator first CHAR: . associate substitute ; inline path-separator first CHAR: . associate substitute ; inline