summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir/ctang-w32.ch
blob: 1c687e5eb67bd687cc7192fd98b26a5b3c92e70e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
This is the change file for CWEB's CTANGLE under Win32
(Contributed by Fabrice Popineau, February 2002)

Changes necessary for compiling with Borland C/C++

@x section 1
@d banner "This is CTANGLE (Version 4.2)"
@y
@d banner "This is CTANGLE (Version 4.2win32)"
@z

@x
boolean names_match(@t\1\1@>
name_pointer p, /* points to the proposed match */
const char *first, /* position of first character of string */
size_t l, /* length of identifier */
eight_bits t@t\2\2@>) /* not used by \.{TANGLE} */
@y
boolean __cdecl names_match(@t\1\1@>
name_pointer p, /* points to the proposed match */
const char *first, /* position of first character of string */
size_t l, /* length of identifier */
eight_bits t@t\2\2@>) /* not used by \.{TANGLE} */
@z

@x
void
init_node(
name_pointer node)
{
    node->equiv=(void *)text_info;
}
void
init_p(name_pointer p,eight_bits t) {@+(void)p;@+(void)t;@+}
@y
void
init_node(
name_pointer node)
{
    node->equiv=(void *)text_info;
}
void __cdecl
init_p(name_pointer p,eight_bits t) {@+(void)p;@+(void)t;@+}
@z