--- a/ExtFunc.st Tue Jan 30 18:15:01 1996 +0100
+++ b/ExtFunc.st Wed Jan 31 02:58:41 1996 +0100
@@ -146,8 +146,10 @@
|retVal called|
%{
+#ifndef __stxNCustomFunctions__
extern int __stxNCustomFunctions__;
extern CUSTOMFUNCTION __stxCustomFunctions__[];
+#endif
int (* func)();
called = false;
@@ -214,8 +216,10 @@
indexOfCustomFunctionNamed:functionName
%{ /* NOCONTEXT */
+#ifndef __stxNCustomFunctions__
extern int __stxNCustomFunctions__;
extern CUSTOMFUNCTION __stxCustomFunctions__[];
+#endif
if (__isString(functionName)) {
char *nm;
@@ -363,6 +367,6 @@
!ExternalFunction class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtFunc.st,v 1.2 1996-01-12 15:28:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExtFunc.st,v 1.3 1996-01-31 01:58:41 cg Exp $'
! !
ExternalFunction initialize!
--- a/ExternalFunction.st Tue Jan 30 18:15:01 1996 +0100
+++ b/ExternalFunction.st Wed Jan 31 02:58:41 1996 +0100
@@ -146,8 +146,10 @@
|retVal called|
%{
+#ifndef __stxNCustomFunctions__
extern int __stxNCustomFunctions__;
extern CUSTOMFUNCTION __stxCustomFunctions__[];
+#endif
int (* func)();
called = false;
@@ -214,8 +216,10 @@
indexOfCustomFunctionNamed:functionName
%{ /* NOCONTEXT */
+#ifndef __stxNCustomFunctions__
extern int __stxNCustomFunctions__;
extern CUSTOMFUNCTION __stxCustomFunctions__[];
+#endif
if (__isString(functionName)) {
char *nm;
@@ -363,6 +367,6 @@
!ExternalFunction class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunction.st,v 1.2 1996-01-12 15:28:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalFunction.st,v 1.3 1996-01-31 01:58:41 cg Exp $'
! !
ExternalFunction initialize!