Update tree shaker for define-temp changes

db4
Slava Pestov 2009-02-23 23:28:22 -06:00
parent e7243da0b8
commit b06903b0ef
1 changed files with 2 additions and 2 deletions

View File

@ -95,7 +95,7 @@ IN: tools.deploy.shaker
"cannot-infer" "cannot-infer"
"coercer" "coercer"
"combination" "combination"
"compiled-effect" "compiled-status"
"compiled-generic-uses" "compiled-generic-uses"
"compiled-uses" "compiled-uses"
"constraints" "constraints"
@ -190,7 +190,7 @@ IN: tools.deploy.shaker
"Stripping default methods" show "Stripping default methods" show
[ [
[ generic? ] instances [ generic? ] instances
[ "No method" throw ] define-temp [ "No method" throw ] (( -- * )) define-temp
dup t "default" set-word-prop dup t "default" set-word-prop
'[ '[
[ _ "default-method" set-word-prop ] [ make-generic ] bi [ _ "default-method" set-word-prop ] [ make-generic ] bi