stack-checker.known-words: fix input class declaration for <string>
it should be { integer-array-capacity integer } ofcourselocals-and-roots
parent
bde8f522f1
commit
bce3a88287
|
@ -58,9 +58,13 @@ IN: compiler.tree.propagation.tests
|
||||||
[ dup string? t xor [ "A" throw ] [ ] if ] final-classes
|
[ dup string? t xor [ "A" throw ] [ ] if ] final-classes
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
{ t } [
|
{
|
||||||
[ dupd <string> drop ] final-info first
|
V{ $[
|
||||||
integer-array-capacity <class-info> =
|
integer-array-capacity <class-info>
|
||||||
|
integer <class-info>
|
||||||
|
] }
|
||||||
|
} [
|
||||||
|
[ 2dup <string> drop ] final-info
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
||||||
{ { } } [
|
{ { } } [
|
||||||
|
|
|
@ -329,7 +329,7 @@ M: object infer-call* \ call bad-macro-input ;
|
||||||
{ (byte-array) { integer-array-capacity } { byte-array } }
|
{ (byte-array) { integer-array-capacity } { byte-array } }
|
||||||
{ <array> { integer-array-capacity object } { array } }
|
{ <array> { integer-array-capacity object } { array } }
|
||||||
{ <byte-array> { integer-array-capacity } { byte-array } }
|
{ <byte-array> { integer-array-capacity } { byte-array } }
|
||||||
{ <string> { integer-array-capacity } { string } }
|
{ <string> { integer-array-capacity integer } { string } }
|
||||||
{ <tuple> { array } { tuple } }
|
{ <tuple> { array } { tuple } }
|
||||||
} make-flushable-primitives
|
} make-flushable-primitives
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue