     } case ;
 
 {
-    >r r> declare call curry compose execute if dispatch
-    <tuple-boa> (throw) load-locals get-local drop-locals
-    do-primitive alien-invoke alien-indirect alien-callback
+    >r r> declare call (call) curry compose execute (execute) if
+dispatch <tuple-boa> (throw) load-locals get-local drop-locals
+do-primitive alien-invoke alien-indirect alien-callback
 } [ t "special" set-word-prop ] each
 
 { call execute dispatch load-locals get-local drop-locals }

        { \ r> [ 1 infer-r> ] }
        { \ declare [ infer-declare ] }
        { \ call [ pop-d infer-call ] }
        { \ curry [ infer-curry ] }
        { \ compose [ infer-compose ] }
        { \ execute [ infer-execute ] }
        { \ if [ infer-if ] }
        { \ dispatch [ infer-dispatch ] }
        { \ <tuple-boa> [ infer-<tuple-boa> ] }

strings.private system threads.private classes.tuple
classes.tuple.private vectors vectors.private words definitions
words.private assocs summary compiler.units system.private
combinators locals.backend words.private quotations.private
stack-checker.state
stack-checker.backend
stack-checker.branches
