Logo Search packages:      
Sourcecode: scheme48 version File versions  Download package

glue.c

/*
 * Phony versions of native-code helper routines for use on architectures for
 * which we have no native code.
 */

long
s48_call_native_procedure(long procedure, long arg_count)
{
  return 3; /* indicates failure; see scheme/vm/interp/call.scm */
}

long
s48_invoke_native_continuation(long code_pointer)
{
  return 3; /* indicates failure; see scheme/vm/interp/call.scm */
}

Generated by  Doxygen 1.6.0   Back to index