Details on my report. It looks like they are all
domain error: cd
RUN ddall NB. report scripts that fail.
gdll
gdll_df
gmbxx
gmbxx1u
gmbxx1w
RUN1 'gdll'
NB. DLL call ------------------------------------------------------------
load'dll'
lib=: LIBTSDLL
dcd=: 4 : '(lib,x) cd y'
NB. test integer types
a=: 4 u: +/401 402 403
b=: 4 u: 402 403
a1=: 10&u: +/401 402 403
b1=: 10&u: 402 403
('&';(,'&');'a';'bc')= 'cbasic c *c c *c' dcd (,'a');'a';'bc'
|domain error: cd
RUN1 'gdll_df'
NB. DLL call with d f declarations
NB. these will fail on builds with C_DF=0
NB. as cd on these platforms can not handle f results
NB. or d or f results
NB. tests were roughly moved here from original gdll
NB. there are tests here that could and should be moved back to gdll
NB. e.g. test with dec of d *d *d would work on raspberry
load'dll'
lib=: LIBTSDLL
dcd=: 4 : '(lib,x) cd y'
NB. d and *d results and *d arg
(6.6;3;1.1 2.2 3.3;,6.6)= 'dipdpd d i *d *d' dcd 3;1.1 2.2 3.3;,1.1
|domain error: cd
| (lib,x) cd y
RUN1 'gmbxx'
NB. mapped boxed arrays -------------------------------------------------
0!:0 <testpath,'gmbx.ijs'
NB. 1!: -----------------------------------------------------------------
q=: x=: <'asdf'
t=: ": ?20$1e6
t 1!:2 x
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:1 x) -: 1!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:3 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:4 x) -: 1!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';2 13
(mbxcheck_jmf_ q), (1!:11 x) -: 1!:11 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';3
y=: 'foo upon thee'
(y 1!:12 x) -: y 1!:12 q
1
q=: x=: 'asdf';3,#y
y -: 1!:11 q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: <'asdf'
(mbxcheck_jmf_ q), 1 [ 1!:55 q
1 1 1 1 1 1 1 1 1
NB. 3!: -----------------------------------------------------------------
q=: x=: <"0 (?2 12$2){(<5!:2 <'g'),< i.2 3
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
q=: x=: <"0 <"0 ?2 3 4$1e6
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
NB. 4!: -----------------------------------------------------------------
q=: x=: ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:0 x) -: 4!:0 q
1 1 1 1 1 1 1 1 1
q=: x=: ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:4 x) -: 4!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: t=: ;:'junkfoo t'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 1 -: 4!:55 q
1 1 1 1 1 1 1 1 1
NB. 5!: -----------------------------------------------------------------
q=: x=: <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:1 x) -: 5!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 x) -: 5!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 x) -: 5!:4 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 x) -: 5!:5 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 x) -: 5!:6 q
1 1 1 1 1 1 1 1 1
q=: x=: (5!:2 <'g'); ;:'avuncular kakistocracy hermeneutics'
(mbxcheck_jmf_ q), (5!:1 <'x') -: 5!:1 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 <'x') -: 5!:2 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 <'x') -: 5!:4 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 <'x') -: 5!:5 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 <'x') -: 5!:6 <'q'
1 1 1 1 1 1 1 1 1
NB. 7!: -----------------------------------------------------------------
q=: x=: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: (;:'Cogito, ergo sum.'), {:: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: (;:'Cogito, ergo sum.'), {:: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:5 <'q') >: 7!:5 <'x'
1 1 1 1 1 1 1 1 1
q=: x=: ;:'base z'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:6 q) -: 7!:6 x
1 1 1 1 1 1 1 1 1
NB. 8!: -----------------------------------------------------------------
q=: x=: <"0 ]7 ?@$ 0
('' (8!:0) x) -: '' (8!:0) q
1
('' (8!:1) x) -: '' (8!:1) q
1
('' (8!:2) x) -: '' (8!:2) q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: x=: <'c4'
y=: 3 4 ?@$ 0
(x 8!:0 y) -: q 8!:0 y
1
(x 8!:1 y) -: q 8!:1 y
1
(x 8!:2 y) -: q 8!:2 y
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
NB. 9!: -----------------------------------------------------------------
q=: x=: 9!:8 ''
9!:9 q
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
k=: 9!:42 ''
9!:43 ]1
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]2
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]3
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]4
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]0
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 k
NB. 15!: ----------------------------------------------------------------
NB. see gdll.ijs
load'dll'
lib=: LIBTSDLL
dcd=: 4 : '(lib,x) cd y'
q=: x=: 1.1;2.2
NB. comment out the following tests to avoid failure with C_DF=0
('ddd d d d' dcd x) -: 'ddd d d d' dcd q
|domain error: cd
| (lib,x) cd y
RUN1 'gmbxx1u'
NB. mapped boxed arrays -------------------------------------------------
0!:0 <testpath,'gmbx.ijs'
NB. 1!: -----------------------------------------------------------------
q=: x=: <'asdf'
t=: ": ?20$1e6
t 1!:2 x
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:1 x) -: 1!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:3 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:4 x) -: 1!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';2 52
(mbxcheck_jmf_ q), (1!:11 x) -: 1!:11 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';3
y=: 10&u:'foo upon thee'
(y 1!:12 x) -: y 1!:12 q
1
q=: x=: 'asdf';3,4*#y
y -: 10&u: (IF64{_2 _4) ic 1!:11 q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: <'asdf'
(mbxcheck_jmf_ q), 1 [ 1!:55 q
1 1 1 1 1 1 1 1 1
NB. 3!: -----------------------------------------------------------------
q=: x=: <"0 (?2 12$2){(<5!:2 <'g'),< i.2 3
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
q=: x=: <"0 <"0 ?2 3 4$1e6
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
NB. 4!: -----------------------------------------------------------------
q=: x=: (10&u:&.>) ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:0 x) -: 4!:0 q
1 1 1 1 1 1 1 1 1
q=: x=: (10&u:&.>) ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:4 x) -: 4!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: t=: (10&u:&.>) ;:'junkfoo t'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 1 -: 4!:55 q
1 1 1 1 1 1 1 1 1
NB. 5!: -----------------------------------------------------------------
q=: x=: <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:1 x) -: 5!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 x) -: 5!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 x) -: 5!:4 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 x) -: 5!:5 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 x) -: 5!:6 q
1 1 1 1 1 1 1 1 1
q=: x=: (5!:2 <'g'); (10&u:&.>) ;:'avuncular kakistocracy hermeneutics'
(mbxcheck_jmf_ q), (5!:1 <'x') -: 5!:1 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 <'x') -: 5!:2 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 <'x') -: 5!:4 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 <'x') -: 5!:5 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 <'x') -: 5!:6 <'q'
1 1 1 1 1 1 1 1 1
NB. 7!: -----------------------------------------------------------------
q=: x=: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: ((10&u:&.>) ;:'Cogito, ergo sum.'), {:: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: ((10&u:&.>) ;:'Cogito, ergo sum.'), {:: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:5 <'q') >: 7!:5 <'x'
1 1 1 1 1 1 1 1 1
q=: x=: (10&u:&.>) ;:'base z'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:6 (5&u:&.>) q) -: 7!:6 (5&u:&.>) x
1 1 1 1 1 1 1 1 1
NB. 8!: -----------------------------------------------------------------
q=: x=: <"0 ]7 ?@$ 0
('' (8!:0) x) -: '' (8!:0) q
1
('' (8!:1) x) -: '' (8!:1) q
1
('' (8!:2) x) -: '' (8!:2) q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: x=: <'c4'
y=: 3 4 ?@$ 0
(x 8!:0 y) -: q 8!:0 y
1
(x 8!:1 y) -: q 8!:1 y
1
(x 8!:2 y) -: q 8!:2 y
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
NB. 9!: -----------------------------------------------------------------
q=: x=: 9!:8 ''
9!:9 q
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
k=: 9!:42 ''
9!:43 ]1
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]2
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]3
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]4
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]0
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 k
NB. 15!: ----------------------------------------------------------------
NB. see gdll.ijs
load'dll'
lib=: LIBTSDLL
dcd=: 4 : '(lib,x) cd y'
q=: x=: 1.1;2.2
NB. comment out the following tests to avoid failure with C_DF=0
('ddd d d d' dcd x) -: 'ddd d d d' dcd q
|domain error: cd
| (lib,x) cd y
RUN1 'gmbxx1w'
NB. mapped boxed arrays -------------------------------------------------
0!:0 <testpath,'gmbx.ijs'
NB. 1!: -----------------------------------------------------------------
q=: x=: <'asdf'
t=: ": ?20$1e6
t 1!:2 x
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:1 x) -: 1!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 [ t 1!:3 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (1!:4 x) -: 1!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';2 26
(mbxcheck_jmf_ q), (1!:11 x) -: 1!:11 q
1 1 1 1 1 1 1 1 1
q=: x=: 'asdf';3
y=: u:'foo upon thee'
(y 1!:12 x) -: y 1!:12 q
1
q=: x=: 'asdf';3,2*#y
y -: (6&u:) 1!:11 q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: <'asdf'
(mbxcheck_jmf_ q), 1 [ 1!:55 q
1 1 1 1 1 1 1 1 1
NB. 3!: -----------------------------------------------------------------
q=: x=: <"0 (?2 12$2){(<5!:2 <'g'),< i.2 3
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
q=: x=: <"0 <"0 ?2 3 4$1e6
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:1) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), q -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), x -: 3!:2 (3!:3) q
1 1 1 1 1 1 1 1 1
NB. 4!: -----------------------------------------------------------------
q=: x=: (u:&.>) ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:0 x) -: 4!:0 q
1 1 1 1 1 1 1 1 1
q=: x=: (u:&.>) ;:'g mean junkfoo'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (4!:4 x) -: 4!:4 q
1 1 1 1 1 1 1 1 1
q=: x=: t=: (u:&.>) ;:'junkfoo t'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 1 1 -: 4!:55 q
1 1 1 1 1 1 1 1 1
NB. 5!: -----------------------------------------------------------------
q=: x=: <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:1 x) -: 5!:1 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 x) -: 5!:2 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 x) -: 5!:4 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 x) -: 5!:5 q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 x) -: 5!:6 q
1 1 1 1 1 1 1 1 1
q=: x=: (5!:2 <'g'); (u:&.>) ;:'avuncular kakistocracy hermeneutics'
(mbxcheck_jmf_ q), (5!:1 <'x') -: 5!:1 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:2 <'x') -: 5!:2 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:4 <'x') -: 5!:4 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:5 <'x') -: 5!:5 <'q'
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (5!:6 <'x') -: 5!:6 <'q'
1 1 1 1 1 1 1 1 1
NB. 7!: -----------------------------------------------------------------
q=: x=: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: ((u:&.>) ;:'Cogito, ergo sum.'), {:: 5!:1 <'mean'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(7!:5 <'q') >: 7!:5 <'x'
1
q=: x=: ((u:&.>) ;:'Cogito, ergo sum.'), {:: 5!:1 <'g'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:5 <'q') >: 7!:5 <'x'
1 1 1 1 1 1 1 1 1
q=: x=: (u:&.>) ;:'base z'
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), (7!:6 (5&u:&.>) q) -: 7!:6 (5&u:&.>) x
1 1 1 1 1 1 1 1 1
NB. 8!: -----------------------------------------------------------------
q=: x=: <"0 ]7 ?@$ 0
('' (8!:0) x) -: '' (8!:0) q
1
('' (8!:1) x) -: '' (8!:1) q
1
('' (8!:2) x) -: '' (8!:2) q
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
q=: x=: <'c4'
y=: 3 4 ?@$ 0
(x 8!:0 y) -: q 8!:0 y
1
(x 8!:1 y) -: q 8!:1 y
1
(x 8!:2 y) -: q 8!:2 y
1
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
NB. 9!: -----------------------------------------------------------------
q=: x=: 9!:8 ''
9!:9 q
mbxcheck_jmf_ q
1 1 1 1 1 1 1 1
k=: 9!:42 ''
9!:43 ]1
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]2
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]3
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]4
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 ]0
q=: x=: 9!:44 ''
(mbxcheck_jmf_ q), x -: q
1 1 1 1 1 1 1 1 1
(mbxcheck_jmf_ q), 9!:45 q
1 1 1 1 1 1 1 1
9!:43 k
NB. 15!: ----------------------------------------------------------------
NB. see gdll.ijs
load'dll'
lib=: LIBTSDLL
dcd=: 4 : '(lib,x) cd y'
q=: x=: 1.1;2.2
NB. comment out the following tests to avoid failure with C_DF=0
('ddd d d d' dcd x) -: 'ddd d d d' dcd q
|domain error: cd
| (lib,x) cd y| (lib,x) cd y
On Wed, Oct 5, 2016 at 10:08 AM, Paul Jackson <[email protected]> wrote:
> I noticed another update of Beta Windows some days ago and confirmed that
> it
>
> included an updated j.dll which fixed the
>
> 'aa'=. /
>
> issue I reported.
>
>
> I finally got around to downloading the test suite and running that in
> Windows.
>
>
> JVERSION
>
> Engine: j805/j64/windows
>
> Beta-12: commercial/2016-09-30T15:50:47
>
> Library: 8.05.05
>
> Qt IDE: 1.5.2s/5.6.1
>
> Platform: Win 64
>
> Installer: J805 install
>
> InstallPath: c:/users/paul/j64-805
>
> Contact: www.jsoftware.com
>
>
> RUN ddall NB. report scripts that fail
>
> gdll
>
> gdll_df
>
> gmbxx
>
> gmbxx1u
>
> gmbxx1w
>
>
>
--
Paul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm