[GnuCOBOL 3.2-early-dev] testsuite: 707 failed

[Harald Arnesen]

Complete testsuite.log attached. Also fails when compiled with gcc 9.2.0

$ cobc --version
cobc (GnuCOBOL) 3.2-early-dev.0
Copyright (C) 2019 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later 
<https://gnu.org/licenses/gpl.html>
This is free software; see the source for copying conditions.  There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Written by Keisuke Nishida, Roger While, Ron Norman, Simon Sobisch, 
Edward Hart
Built     Dec 29 2019 12:38:04
Packaged  Dec 05 2019 15:14:56 UTC
C version "Clang 9.0.1 "


#                             -*- compilation -*-
707. run_file.at:708: testing INDEXED File KEYCHECK ...
./run_file.at:1433: $COMPILE -std=mf -w prog.cob
./run_file.at:1435: ./prog
--- -   2019-12-29 13:15:27.206309758 +0100
+++ 
/home/harald/src/gnucobol/trunk/tests/testsuite.dir/at-groups/707/stdout 
2019-12-29 13:15:27.201431131 +0100
@@ -52,7 +52,7 @@
 A: Expected ERROR 39 opening TSTFILE, Record size different
 B: Expected ERROR 39 opening BADFILE, Index mismatch
 C: Expected open BADFILE, with Index mismatch
-Key: ALP00000 is 2417     : 549  mmm
-Key: FOR00000 is 2417     : 549  mmm
-Key: JOH00000 is 8417     : 1600 BPI
+Key: ALP00000 is 3131234432 : UNI-9030
+Key: INC00000 is 3455445444 : UNI-80/8
+Key: BET00000 is 4082938498 : UNI-9040

707. run_file.at:708: 707. INDEXED File KEYCHECK (run_file.at:708): 
FAILED (run_file.at:1435)

testsuite.log
Description: Text Data