diff options
Diffstat (limited to 'src/pl/tcl/pltcl.c')
| -rw-r--r-- | src/pl/tcl/pltcl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pl/tcl/pltcl.c b/src/pl/tcl/pltcl.c index bfbf62305c3..76c9afc3391 100644 --- a/src/pl/tcl/pltcl.c +++ b/src/pl/tcl/pltcl.c @@ -610,7 +610,7 @@ call_pltcl_start_proc(Oid prolang, bool pltrusted) /* Set up errcontext callback to make errors more helpful */ errcallback.callback = start_proc_error_callback; - errcallback.arg = (void *) gucname; + errcallback.arg = unconstify(char *, gucname); errcallback.previous = error_context_stack; error_context_stack = &errcallback; @@ -3081,7 +3081,7 @@ pltcl_set_tuple_values(Tcl_Interp *interp, const char *arrayname, else Tcl_UnsetVar2(interp, *arrptr, *nameptr, 0); - pfree((char *) attname); + pfree(unconstify(char *, attname)); } } |