Merge branch 'master' of jsoftware.com:jsource

Avoid signed integer overflow

Author: HenryHRich

test/g430.ijs

@@ -585,6 +585,11 @@ a =: i. 1000 1000
 2 _. _. _. 5 (= +. *.&(128!:5))"0 (3) (+/%#)\ 1 2 3 _. 4 5 6
 _. 16 14 12 _. (= +. *.&(128!:5))"0 (3) +/\. 1 2 3 _. 4 5 6
 
+a =: 0 1 2 3 4 5 6 ,. 0 1 2 _. 4 5 6 ,. 0 1 2 __ 4 5 6 ,. 0 1 2 3 4 _ 6
+l =: ? 7
+(l 3 :'+/y'\ a) (= +. *.&(128!:5))"0 l +/\ a
+(l 3 :'(+/y)%#y'\ a) (= +. *.&(128!:5))"0 l (+/%#)\ a
+(l 3 :'+/y'\. a) (= +. *.&(128!:5))"0 l +/\. a
 
 randfini''