diff options
Diffstat (limited to 'src/interfaces/libpgtcl/pgtclCmds.c')
| -rw-r--r-- | src/interfaces/libpgtcl/pgtclCmds.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/interfaces/libpgtcl/pgtclCmds.c b/src/interfaces/libpgtcl/pgtclCmds.c index 0cfc3cb3a86..1babd8890e8 100644 --- a/src/interfaces/libpgtcl/pgtclCmds.c +++ b/src/interfaces/libpgtcl/pgtclCmds.c @@ -7,7 +7,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.11 1997/01/11 14:28:51 scrappy Exp $ + * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtclCmds.c,v 1.12 1997/01/23 19:47:18 scrappy Exp $ * *------------------------------------------------------------------------- */ @@ -43,7 +43,7 @@ translate_escape(char *p, int isArray) { register char c, *q, *s; -#ifdef DEBUG_ESCAPE +#ifdef TCL_ARRAYS_DEBUG_ESCAPE printf(" escape = '%s'\n", p); #endif /* Address of the first character after the escape sequence */ @@ -125,7 +125,7 @@ translate_escape(char *p, int isArray) *q++ = *s++; } *q = '\0'; -#ifdef DEBUG_ESCAPE +#ifdef TCL_ARRAYS_DEBUG_ESCAPE printf(" after = '%s'\n", p); #endif return p; @@ -143,13 +143,13 @@ static char * tcl_value (char *value) { int literal, last; - register char c, *p, *q, *s; + register char *p; if (!value) { return ((char *) NULL); } -#ifdef DEBUG +#ifdef TCL_ARRAYS_DEBUG printf("pq_value = '%s'\n", value); #endif last = strlen(value)-1; @@ -202,7 +202,7 @@ tcl_value (char *value) } } } -#ifdef DEBUG +#ifdef TCL_ARRAYS_DEBUG printf("tcl_value = '%s'\n\n", value); #endif return (value); |