diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-24 19:10:21 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-24 19:10:21 +0200 |
commit | aa3f4a2b760c3d890aa51b3afa904ab604de794c (patch) | |
tree | c031c1242e0c1ad2ae92cf00347f36ec343065de /MLKForeignProcedure.m | |
parent | baae263841853c289d48ce172e614171167cf1dd (diff) | |
parent | a34b771cd9cc823260407b2905312b3be05390db (diff) |
Merge mulk_benkard@ssh.phx.nearlyfreespeech.net:/home/htdocs/code/mulklisp
Diffstat (limited to 'MLKForeignProcedure.m')
-rw-r--r-- | MLKForeignProcedure.m | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/MLKForeignProcedure.m b/MLKForeignProcedure.m index 459ce97..b8dab83 100644 --- a/MLKForeignProcedure.m +++ b/MLKForeignProcedure.m @@ -36,7 +36,7 @@ @implementation MLKForeignProcedure -(id) initWithCode:(void *)code argumentTypes:(NSArray *)argTypes - returnType:(id)returnType + returnType:(MLKForeignType)returnType { int i; NSEnumerator *e; @@ -45,7 +45,7 @@ self = [super init]; _code = code; - _returnType = MLKForeignTypeWithTypeDesignator (returnType); + _returnType = returnType; _argumentTypes = malloc (sizeof (MLKForeignType) * [argTypes count]); |