-/* Copyright (C) 2010, 2011, 2012, 2013 Free Software Foundation, Inc.
+/* Copyright (C) 2010-2013 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
/* We support calling foreign functions with up to 100 arguments. */
#define CODE(nreq) \
- SCM_PACK_RTL_24 (scm_op_assert_nargs_ee, nreq + 1), \
- SCM_PACK_RTL_12_12 (scm_op_foreign_call, 0, 1)
+ SCM_PACK_OP_24 (assert_nargs_ee, nreq + 1), \
+ SCM_PACK_OP_12_12 (foreign_call, 0, 1)
#define CODE_10(n) \
CODE (n + 0), CODE (n + 1), CODE (n + 2), CODE (n + 3), CODE (n + 4), \