Skip to content

Commit 93d5877

Browse files
author
sf-mensch
committed
follow-up to r5208 "header include"
presumingly fixing win32 tests
1 parent 106e7ce commit 93d5877

File tree

2 files changed

+7
-7
lines changed

2 files changed

+7
-7
lines changed

doc/gnucobol.texi

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -66,7 +66,7 @@ together with a designated C compiler and linker.
6666
This manual corresponds to GnuCOBOL @value{VERSION}.
6767
@page
6868
@vskip 0pt plus 1filll
69-
Copyright @copyright{} 2002-2012, 2014-2023 Free Software Foundation, Inc.@*
69+
Copyright @copyright{} 2002-2012, 2014-2024 Free Software Foundation, Inc.@*
7070
Written by Keisuke Nishida, Roger While, Brian Tiffin, Simon Sobisch.
7171

7272
@insertcopying
@@ -1597,7 +1597,7 @@ enum cob_runtime_option_switch @{
15971597
COB_SET_RUNTIME_RESCAN_ENV /* rescan environment variables */
15981598
COB_SET_RUNTIME_DISPLAY_PUNCH_FILE /* 'p' is FILE * */
15991599
@};
1600-
COB_EXPIMP void cob_set_runtime_option (enum cob_runtime_option_switch opt, void *p);
1600+
COB_EXT_IMPORT void cob_set_runtime_option (enum cob_runtime_option_switch opt, void *p);
16011601
@end smallexample
16021602

16031603
So from you C code you can tell the GnuCOBOL runtime to redirect TRACE output by:
@@ -1620,7 +1620,7 @@ cob_set_runtime_option (COB_SET_RUNTIME_DISPLAY_PUNCH_FILE,
16201620

16211621
Another routine can be used to return the current value of the option.
16221622
@example
1623-
COB_EXPIMP void *
1623+
COB_EXT_IMPORT void *
16241624
cob_get_runtime_option (enum cob_runtime_option_switch opt);
16251625
@end example
16261626

@@ -1631,7 +1631,7 @@ When an EBCDIC/ASCII translation table is needed (for instance when calling
16311631
sort functions), you can can call the @code{cob_load_collation} function to
16321632
retrieve such tables:
16331633
@example
1634-
COB_EXPIMP int
1634+
COB_EXT_IMPORT int
16351635
cob_load_collation (const char *col_name,
16361636
cob_u8_t *ebcdic_to_ascii,
16371637
cob_u8_t *ascii_to_ebcdic)

tests/testsuite.src/used_binaries.at

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,4 @@
1-
## Copyright (C) 2014-2023 Free Software Foundation, Inc.
1+
## Copyright (C) 2014-2024 Free Software Foundation, Inc.
22
## Written by Simon Sobisch, Brian Tiffin
33
##
44
## This file is part of GnuCOBOL.
@@ -1083,10 +1083,10 @@ AT_CLEANUP
10831083

10841084

10851085
AT_SETUP([check include header file])
1086-
AT_KEYWORDS([-include])
1086+
#AT_KEYWORDS([include])
10871087

10881088
AT_DATA([file.h], [
1089-
extern void f(char *, long );
1089+
COB_EXT_IMPORT void f (char *, long);
10901090
])
10911091
AT_DATA([prog.cob], [
10921092
IDENTIFICATION DIVISION.

0 commit comments

Comments
 (0)