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

Generalize operation

db4
Slava Pestov 2009-04-11 15:11:40 -05:00
parent 59dced5c9d
commit 39685724cc
1 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
basis/ui/tools/operations/operations.factor
View File

@ -1,15 +1,15 @@
! Copyright (C) 2006, 2009 Slava Pestov. ! Copyright (C) 2006, 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: continuations definitions generic help.topics threads USING: continuations definitions generic help.topics threads
stack-checker summary io.pathnames io.styles kernel namespaces stack-checker summary io.pathnames io.styles kernel namespaces parser
parser prettyprint quotations tools.crossref tools.annotations prettyprint quotations tools.crossref tools.annotations editors
editors tools.profiler tools.test tools.time tools.walker vocabs tools.profiler tools.test tools.time tools.walker vocabs vocabs.loader
vocabs.loader words sequences tools.vocabs classes words sequences tools.vocabs classes compiler.errors compiler.units
compiler.errors compiler.units accessors vocabs.parser macros.expander ui accessors vocabs.parser macros.expander ui ui.tools.browser
ui.tools.browser ui.tools.listener ui.tools.listener.completion ui.tools.listener ui.tools.listener.completion ui.tools.profiler
ui.tools.profiler ui.tools.inspector ui.tools.traceback ui.tools.inspector ui.tools.traceback ui.commands ui.gadgets.editors
ui.commands ui.gadgets.editors ui.gestures ui.operations ui.gestures ui.operations ui.tools.deploy models help.tips
ui.tools.deploy models help.tips ; source-files.errors ;
IN: ui.tools.operations IN: ui.tools.operations
! Objects ! Objects
@ -86,8 +86,8 @@ IN: ui.tools.operations
{ +listener+ t } { +listener+ t }
} define-operation } define-operation
! Compiler errors ! Source file error
[ compiler-error? ] \ edit-error H{ [ source-file-error? ] \ edit-error H{
{ +primary+ t } { +primary+ t }
{ +secondary+ t } { +secondary+ t }
{ +listener+ t } { +listener+ t }