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

edit-vocab word

db4
Slava Pestov 2008-02-24 17:40:28 -06:00
parent d2c5f28b65
commit 425fd8e551
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/editors/editors.factor
View File

@ -35,6 +35,9 @@ SYMBOL: edit-hook
: edit ( defspec -- ) : edit ( defspec -- )
where [ first2 edit-location ] when* ; where [ first2 edit-location ] when* ;
: edit-vocab ( name -- )
vocab-source-path 1 edit-location ;
: :edit ( -- ) : :edit ( -- )
error get delegates [ parse-error? ] find-last nip [ error get delegates [ parse-error? ] find-last nip [
dup parse-error-file source-file-path ?resource-path dup parse-error-file source-file-path ?resource-path