basis/typed/debugger/debugger.factor

   1 ! (c)Joe Groff bsd license
   2 USING: typed compiler.cfg.debugger compiler.tree.debugger words ;
   3 IN: typed.debugger
   4
   5 : typed-test-mr ( word -- mrs )
   6     "typed-word" word-prop test-mr ; inline
   7 : typed-test-mr. ( word -- )
   8     "typed-word" word-prop test-mr mr. ; inline
   9 : typed-optimized. ( word -- )
  10     "typed-word" word-prop optimized. ; inline