generic.standard: add some tests.
parent
9aab1c87b4
commit
6e397d5244
|
@ -375,6 +375,9 @@ must-fail-with
|
||||||
[ "IN: generic.standard.tests GENERIC# broken-generic# 1 ( a -- b )" eval( -- ) ]
|
[ "IN: generic.standard.tests GENERIC# broken-generic# 1 ( a -- b )" eval( -- ) ]
|
||||||
[ error>> bad-dispatch-position? ]
|
[ error>> bad-dispatch-position? ]
|
||||||
must-fail-with
|
must-fail-with
|
||||||
|
[ "IN: generic.standard.tests GENERIC# broken-generic# 2/3 ( a b c -- )" eval( -- ) ]
|
||||||
|
[ error>> bad-dispatch-position? ]
|
||||||
|
must-fail-with
|
||||||
|
|
||||||
! Generic words cannot be inlined
|
! Generic words cannot be inlined
|
||||||
{ } [ "IN: generic.standard.tests GENERIC: foo ( x -- x )" eval( -- ) ] unit-test
|
{ } [ "IN: generic.standard.tests GENERIC: foo ( x -- x )" eval( -- ) ] unit-test
|
||||||
|
|
Loading…
Reference in New Issue