[svn:parrot] r45031 - trunk/src
petdance at svn.parrot.org
petdance at svn.parrot.org
Thu Mar 18 21:32:15 UTC 2010
Author: petdance
Date: Thu Mar 18 21:32:14 2010
New Revision: 45031
URL: https://trac.parrot.org/parrot/changeset/45031
Log:
removed unused variables. Thanks, ICC!
Modified:
trunk/src/debug.c
Modified: trunk/src/debug.c
==============================================================================
--- trunk/src/debug.c Thu Mar 18 21:27:46 2010 (r45030)
+++ trunk/src/debug.c Thu Mar 18 21:32:14 2010 (r45031)
@@ -966,8 +966,6 @@
PDB_get_command(PARROT_INTERP)
{
ASSERT_ARGS(PDB_get_command)
- unsigned int i;
- int ch;
char *c;
PDB_t * const pdb = interp->pdb;
@@ -1022,8 +1020,6 @@
if (pdb->cur_command[0] != '\0')
strcpy(pdb->last_command, pdb->cur_command);
- i = 0;
-
c = pdb->cur_command;
Parrot_io_eprintf(pdb->debugger, "\n");
@@ -1043,8 +1039,6 @@
strcpy(c, aux);
Parrot_str_free_cstring(aux);
}
-
- ch = '\n';
}
}
}
@@ -1302,7 +1296,6 @@
char str[DEBUG_CMD_BUFFER_LENGTH + 1];
unsigned short cond_argleft;
unsigned short cond_type;
- unsigned char regleft;
int i, reg_number;
TRACEDEB_MSG("PDB_cond");
@@ -1322,7 +1315,7 @@
/* get the register number */
auxcmd = ++command;
- regleft = (unsigned char)get_uint(&command, 0);
+ get_uint(&command, 0);
if (auxcmd == command) {
Parrot_io_eprintf(interp->pdb->debugger, "Invalid register\n");
return NULL;
More information about the parrot-commits
mailing list