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

Changes to compiler.tree.propagation.inlining

db4
Daniel Ehrenberg 2010-04-20 00:39:08 -05:00
parent 3ed4a82475
commit 19a44d65df
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/compiler/tree/propagation/inlining/inlining.factor
View File

@ -65,9 +65,10 @@ M: callable splicing-nodes splicing-body ;
object generic method-classes object generic method-classes
[| last-class new-class | [| last-class new-class |
class new-class classes-intersect? [ class new-class classes-intersect? [
new-class class class< [ class new-class class<=
[ object f ] [
last-class new-class class-min last-class new-class class-min
] [ object f ] if ] if
] [ last-class t ] if ] [ last-class t ] if
] all? ; ] all? ;