blob: 5652416904ee9b7d1e4c140e8edee00802e7919e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
/*
* extcall.r
*/
#if !COMPILER
#ifdef ExternalFunctions
/*
* extcall - stub procedure for external call interface.
*/
dptr extcall(dargv, argc, ip)
dptr dargv;
int argc;
int *ip;
{
*ip = 216; /* no external function to find */
return (dptr)NULL;
}
#endif /* ExternalFunctions */
#endif /* !COMPILER */
|