diff --git a/tests/testsuite.src/used_binaries.at b/tests/testsuite.src/used_binaries.at index 7e71e0f76..eff1c06b9 100644 --- a/tests/testsuite.src/used_binaries.at +++ b/tests/testsuite.src/used_binaries.at @@ -1095,7 +1095,7 @@ AT_CLEANUP AT_SETUP([check include header file]) -#AT_KEYWORDS([cobc copy include imp]) +AT_KEYWORDS([cobc copy directive imp]) AT_DATA([filec.h], [ /* COB_EXT_IMPORT will be defined by libcob.h up-front */ @@ -1171,8 +1171,9 @@ AT_CHECK([$COMPILE_MODULE -Wno-unfinished --copy "f.copy" -fstatic-call prog2.co AT_CHECK([$COMPILE_MODULE -Wno-unfinished --copy "f.copy" -fstatic-call -L. -lfilec prog2.cob -o prog2c], [0], ignore, ignore)] ) +# additional check via directive AT_DATA([prog3.cob], [ - >> IMP INCLUDE "file.h" + >> IMP INCLUDE "filec.h" IDENTIFICATION DIVISION. PROGRAM-ID. prog. DATA DIVISION. @@ -1182,6 +1183,12 @@ AT_DATA([prog3.cob], [ CALL "f" USING "Hello" BY VALUE long RETURNING NOTHING. ]) +# static build with correct function signature +AT_CHECK([$COMPILE_MODULE -I . -fstatic-call prog3.cob], [0], [], [], [ + # Previous test "failed" --> retry with import library + AT_CHECK([$COMPILE_MODULE -I . -fstatic-call -L. -lfilec prog3.cob], [0], ignore, ignore)] +) + # static build with correct function signature # AT_CHECK([$COBC -m -I . -fstatic-call prog3.cob], [0], [], [])