14 lines
490 B
Diff
14 lines
490 B
Diff
|
Index: gnucobol-3.1.2/tests/testsuite.src/run_misc.at
|
||
|
|
===================================================================
|
||
|
|
--- gnucobol-3.1.2.orig/tests/testsuite.src/run_misc.at
|
||
|
|
+++ gnucobol-3.1.2/tests/testsuite.src/run_misc.at
|
||
|
|
@@ -10402,7 +10402,7 @@ COB_EXT_EXPORT int
|
||
|
|
CAPI (void *p1, ...)
|
||
|
|
{
|
||
|
|
int k,nargs,type,digits,scale,size,sign,byvalue;
|
||
|
|
- cob_s64_t val;
|
||
|
|
+ cob_s64_t val = 0;
|
||
|
|
char *str;
|
||
|
|
char wrk[80],pic[30]; /* note: maxium _theoretical_ size */
|
||
|
|
|