mirror of
https://github.com/Mercury-Language/mercury.git
synced 2026-04-16 01:43:35 +00:00
1031e7e4e4
Branches: main, 10.04.1
library/array.m:
Don't use reflection to implement Java versions of array predicates.
It is faster just to test the array type at runtime, repeating the
code for each array type we support.
Fix wrong casts in ML_copy_array for char[] and Object[] arrays.
tests/hard_coded/Mmakefile:
tests/hard_coded/array_test2.exp:
tests/hard_coded/array_test2.m:
Add test case.
66 lines
2.0 KiB
Plaintext
66 lines
2.0 KiB
Plaintext
----
|
|
size: 5
|
|
elements: [10, 11, 12, 13, 14]
|
|
good: out of bounds lookup averted
|
|
good: out of bounds lookup averted
|
|
good: out of bounds set averted
|
|
good: out of bounds set averted
|
|
resize without resizing: array([10, 11, 12, 13, 14])
|
|
shrink: array([10, 11, 12])
|
|
enlarge: array([10, 11, 12, 10, 10])
|
|
empty: array([])
|
|
still empty: array([])
|
|
nonempty from empty: array([10, 10, 10])
|
|
----
|
|
size: 5
|
|
elements: [10.0, 11.1, 12.2, 13.3, 14.4]
|
|
good: out of bounds lookup averted
|
|
good: out of bounds lookup averted
|
|
good: out of bounds set averted
|
|
good: out of bounds set averted
|
|
resize without resizing: array([10.0, 11.1, 12.2, 13.3, 14.4])
|
|
shrink: array([10.0, 11.1, 12.2])
|
|
enlarge: array([10.0, 11.1, 12.2, 10.0, 10.0])
|
|
empty: array([])
|
|
still empty: array([])
|
|
nonempty from empty: array([10.0, 10.0, 10.0])
|
|
----
|
|
size: 5
|
|
elements: ['p', 'o', 'k', 'e', 'y']
|
|
good: out of bounds lookup averted
|
|
good: out of bounds lookup averted
|
|
good: out of bounds set averted
|
|
good: out of bounds set averted
|
|
resize without resizing: array(['p', 'o', 'k', 'e', 'y'])
|
|
shrink: array(['p', 'o', 'k'])
|
|
enlarge: array(['p', 'o', 'k', 'p', 'p'])
|
|
empty: array([])
|
|
still empty: array([])
|
|
nonempty from empty: array(['p', 'p', 'p'])
|
|
----
|
|
size: 5
|
|
elements: [yes, no, yes, yes, no]
|
|
good: out of bounds lookup averted
|
|
good: out of bounds lookup averted
|
|
good: out of bounds set averted
|
|
good: out of bounds set averted
|
|
resize without resizing: array([yes, no, yes, yes, no])
|
|
shrink: array([yes, no, yes])
|
|
enlarge: array([yes, no, yes, yes, yes])
|
|
empty: array([])
|
|
still empty: array([])
|
|
nonempty from empty: array([yes, yes, yes])
|
|
----
|
|
size: 5
|
|
elements: ["ten", "eleven", "twelve", "thirteen", "fourteen"]
|
|
good: out of bounds lookup averted
|
|
good: out of bounds lookup averted
|
|
good: out of bounds set averted
|
|
good: out of bounds set averted
|
|
resize without resizing: array(["ten", "eleven", "twelve", "thirteen", "fourteen"])
|
|
shrink: array(["ten", "eleven", "twelve"])
|
|
enlarge: array(["ten", "eleven", "twelve", "ten", "ten"])
|
|
empty: array([])
|
|
still empty: array([])
|
|
nonempty from empty: array(["ten", "ten", "ten"])
|