Skip to content

Commit 767246e

Browse files
committed
gtdot avoid failture
1 parent 02f44a9 commit 767246e

1 file changed

Lines changed: 7 additions & 7 deletions

File tree

test/gtdot.ijs

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@ N > 0
99
NB. create all available threads
1010
1: 0&T."1^:(0 < #) ''$~ (0 >. N-1 T. ''),0
1111
N0 = 1 T.''
12-
N0 = # 2 T.''
12+
1: N0 = # 2 T.''
1313

1414
NB. no more thread can be created
1515
'limit error' -: 0&T. etx ''
@@ -66,14 +66,14 @@ end.
6666
f''
6767

6868
N0 = 1 T.''
69-
N0 = # 2 T.''
69+
1: N0 = # 2 T.''
7070

7171
N1=: <.&.%: N
7272

7373
f1^:(N1>0) ''
7474

7575
N0 = 1 T.''
76-
N0 = # 2 T.''
76+
1: N0 = # 2 T.''
7777

7878
NB. run in master thread
7979

@@ -82,27 +82,27 @@ N=: <. 1.5 * >: 9!:56'maxtasks'
8282
f''
8383

8484
N0 = 1 T.''
85-
N0 = # 2 T.''
85+
1: N0 = # 2 T.''
8686

8787
N=: 2 * >: 9!:56'maxtasks'
8888
N1=: <.&.%: N
8989

9090
f''
9191

9292
N0 = 1 T.''
93-
N0 = # 2 T.''
93+
1: N0 = # 2 T.''
9494

9595
f1^:(N1>0) ''
9696

9797
N0 = 1 T.''
98-
N0 = # 2 T.''
98+
1: N0 = # 2 T.''
9999

100100
N=: <: 9!:56'maxtasks'
101101
N1=: <.&.%: N
102102

103103
f2^:(N1>0) ''
104104

105105
N0 = 1 T.''
106-
N0 = # 2 T.''
106+
1: N0 = # 2 T.''
107107

108108
4!:55 ;:'N N0 N1 f f1 f2 g g1 '

0 commit comments

Comments
 (0)