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

compiler.tree.propagation.slots: remove unused word 

The last use of `length-accessor?` has been removed in
8e227bc874, which obsoleted the `length` slot.
master
timor 2020-05-19 17:53:33 +02:00 committed by John Benediktsson
parent e065e5b315
commit 01a389cb68
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/compiler/tree/propagation/slots/slots.factor
View File

@ -47,9 +47,6 @@ IN: compiler.tree.propagation.slots
[ swap slot <literal-info> ] [ swap slot <literal-info> ]
} 2&& ; } 2&& ;
: length-accessor? ( slot info -- ? )
[ 1 = ] [ length>> ] bi* and ;
: value-info-slot ( slot info -- info' ) : value-info-slot ( slot info -- info' )
{ {
{ [ over 0 = ] [ 2drop fixnum <class-info> ] } { [ over 0 = ] [ 2drop fixnum <class-info> ] }