blob: 4107fcdcd8db8fecccebcf39b2f8a9cf4ae484d9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
// External.c - implements external C function calling pascal.
#include "MainExports.h"
SInt32 CFunction(void)
{
Str255 msg;
// use GetIndString just to use data fork resources
GetIndString(msg, 128, 1);
// call back to pascal main:
Message(msg);
return 123;
}
|
