[svn:parrot] r44527 - branches/rm_cflags/compilers/imcc
coke at svn.parrot.org
coke at svn.parrot.org
Sat Feb 27 01:53:02 UTC 2010
Author: coke
Date: Sat Feb 27 01:53:01 2010
New Revision: 44527
URL: https://trac.parrot.org/parrot/changeset/44527
Log:
rename this parameter back to param - otherwise it breaks the build.
Modified:
branches/rm_cflags/compilers/imcc/instructions.c
Modified: branches/rm_cflags/compilers/imcc/instructions.c
==============================================================================
--- branches/rm_cflags/compilers/imcc/instructions.c Sat Feb 27 01:30:14 2010 (r44526)
+++ branches/rm_cflags/compilers/imcc/instructions.c Sat Feb 27 01:53:01 2010 (r44527)
@@ -794,19 +794,19 @@
*/
static int
-e_file_open(PARROT_INTERP, ARGIN(const char *file))
+e_file_open(PARROT_INTERP, ARGIN(const char *param))
{
ASSERT_ARGS(e_file_open)
DECL_CONST_CAST;
- if (!STREQ(file, "-")) {
- FILE *newfile = freopen(file, "w", stdout);
+ if (!STREQ(param, "-")) {
+ FILE *newfile = freopen(param, "w", stdout);
if (!newfile)
Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_EXTERNAL_ERROR,
"Cannot reopen stdout: %s'\n", strerror(errno));
}
- output = PARROT_const_cast(char *, file);
+ output = PARROT_const_cast(char *, param);
Parrot_io_printf(interp, "# IMCC does produce b0rken PASM files\n");
Parrot_io_printf(interp, "# see http://guest@rt.perl.org/rt3/Ticket/Display.html?id=32392\n");
return 1;
@@ -862,7 +862,7 @@
/*
-=item C<int emit_open(PARROT_INTERP, int type, void *param)>
+=item C<int emit_open(PARROT_INTERP, int type, const char *param)>
Opens the emitter function C<open> of the given C<type>. Passes
the C<param> to the open function.
More information about the parrot-commits
mailing list