2009-09-25 19:50:08 -04:00
|
|
|
USING: math hashtables accessors kernel words hints
|
|
|
|
|
compiler.tree.debugger tools.test ;
|
|
|
|
|
IN: hints.tests
|
|
|
|
|
|
|
|
|
|
! Regression
|
|
|
|
|
GENERIC: blahblah ( a b c -- )
|
|
|
|
|
|
|
|
|
|
M: hashtable blahblah 2nip [ 1 + ] change-count drop ;
|
|
|
|
|
|
|
|
|
|
HINTS: M\ hashtable blahblah { object fixnum object } { object word object } ;
|
|
|
|
|
|
2010-05-05 16:52:54 -04:00
|
|
|
[ t ] [ M\ hashtable blahblah { count>> count<< } inlined? ] unit-test
|
