diff options
Diffstat (limited to 'Mac/Modules/macfsmodule.c')
| -rw-r--r-- | Mac/Modules/macfsmodule.c | 21 |
1 files changed, 12 insertions, 9 deletions
diff --git a/Mac/Modules/macfsmodule.c b/Mac/Modules/macfsmodule.c index c694c66..2183685 100644 --- a/Mac/Modules/macfsmodule.c +++ b/Mac/Modules/macfsmodule.c @@ -1,6 +1,6 @@ /*********************************************************** -Copyright 1991, 1992, 1993, 1994 by Stichting Mathematisch Centrum, -Amsterdam, The Netherlands. +Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam, +The Netherlands. All Rights Reserved @@ -63,6 +63,9 @@ staticforward typeobject Mfsstype; #define is_mfssobject(v) ((v)->ob_type == &Mfsstype) + +mfssobject *newmfssobject(FSSpec *fss); /* Forward */ + /* ---------------------------------------------------------------- */ static object * @@ -134,9 +137,9 @@ mfsa_Update(self, args) } static struct methodlist mfsa_methods[] = { - {"Resolve", mfsa_Resolve, 1}, - {"GetInfo", mfsa_GetInfo, 1}, - {"Update", mfsa_Update, 1}, + {"Resolve", (method)mfsa_Resolve, 1}, + {"GetInfo", (method)mfsa_GetInfo, 1}, + {"Update", (method)mfsa_Update, 1}, {NULL, NULL} /* sentinel */ }; @@ -286,10 +289,10 @@ mfss_NewAliasMinimal(self, args) } static struct methodlist mfss_methods[] = { - {"as_pathname", mfss_as_pathname, 1}, - {"as_tuple", mfss_as_tuple, 1}, - {"NewAlias", mfss_NewAlias, 1}, - {"NewAliasMinimal", mfss_NewAliasMinimal, 1}, + {"as_pathname", (method)mfss_as_pathname, 1}, + {"as_tuple", (method)mfss_as_tuple, 1}, + {"NewAlias", (method)mfss_NewAlias, 1}, + {"NewAliasMinimal", (method)mfss_NewAliasMinimal, 1}, {NULL, NULL} /* sentinel */ }; |