diff options
Diffstat (limited to 'functions.m')
-rw-r--r-- | functions.m | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/functions.m b/functions.m index 2d8a08f..a884c40 100644 --- a/functions.m +++ b/functions.m @@ -411,34 +411,3 @@ id MLKInterpretedFunctionTrampoline (void *target, ...) else return nil; } - -id MLKDispatchRootFunction (MLKSymbol *name, ...) -{ - NSArray *values; - NSMutableArray *arguments; - id arg; - va_list ap; - - //NSLog (@"Calling intrinsic."); - //NSLog (@"Intrinsic function: %@", MLKPrintToString (name)); - - arguments = [NSMutableArray array]; - - va_start (ap, name); - while ((arg = va_arg (ap, id)) != MLKEndOfArgumentsMarker) - { - //NSLog (@"Argument: %p", arg); - [arguments addObject:nullify(arg)]; - } - va_end (ap); - - values = [MLKRoot dispatch:name withArguments:arguments]; - - if ([values count] > 0) - { - //NSLog (@"RETURN: %p", denullify ([values objectAtIndex:0])); - return denullify ([values objectAtIndex:0]); - } - else - return nil; -} |