Commit 1e091ad6 authored by Tom Lane's avatar Tom Lane

Add 'volatile' declarations to silence gcc warnings about longjmp.

Shouldn't create any portability problems, since we have a configure
test to #define away volatile if the compiler doesn't support it.
parent f8841302
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
* procedural language (PL) * procedural language (PL)
* *
* IDENTIFICATION * IDENTIFICATION
* $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.18 2000/01/15 22:43:23 tgl Exp $ * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.19 2000/02/27 07:18:29 tgl Exp $
* *
* This software is copyrighted by Jan Wieck - Hamburg. * This software is copyrighted by Jan Wieck - Hamburg.
* *
...@@ -417,7 +417,7 @@ pltcl_func_handler(FmgrInfo *proinfo, ...@@ -417,7 +417,7 @@ pltcl_func_handler(FmgrInfo *proinfo,
char *stroid; char *stroid;
Tcl_HashEntry *hashent; Tcl_HashEntry *hashent;
int hashnew; int hashnew;
pltcl_proc_desc *prodesc; pltcl_proc_desc * volatile prodesc;
Tcl_DString tcl_cmd; Tcl_DString tcl_cmd;
Tcl_DString list_tmp; Tcl_DString list_tmp;
int tcl_rc; int tcl_rc;
...@@ -739,7 +739,7 @@ pltcl_trigger_handler(FmgrInfo *proinfo) ...@@ -739,7 +739,7 @@ pltcl_trigger_handler(FmgrInfo *proinfo)
int hashnew; int hashnew;
pltcl_proc_desc *prodesc; pltcl_proc_desc *prodesc;
TupleDesc tupdesc; TupleDesc tupdesc;
HeapTuple rettup; volatile HeapTuple rettup;
Tcl_DString tcl_cmd; Tcl_DString tcl_cmd;
Tcl_DString tcl_trigtup; Tcl_DString tcl_trigtup;
Tcl_DString tcl_newtup; Tcl_DString tcl_newtup;
...@@ -1289,13 +1289,13 @@ pltcl_SPI_exec(ClientData cdata, Tcl_Interp *interp, ...@@ -1289,13 +1289,13 @@ pltcl_SPI_exec(ClientData cdata, Tcl_Interp *interp,
int spi_rc; int spi_rc;
char buf[64]; char buf[64];
int count = 0; int count = 0;
char *arrayname = NULL; char * volatile arrayname = NULL;
int query_idx; volatile int query_idx;
int i; int i;
int loop_rc; int loop_rc;
int ntuples; int ntuples;
HeapTuple *tuples; HeapTuple * volatile tuples;
TupleDesc tupdesc = NULL; volatile TupleDesc tupdesc = NULL;
sigjmp_buf save_restart; sigjmp_buf save_restart;
char *usage = "syntax error - 'SPI_exec " char *usage = "syntax error - 'SPI_exec "
...@@ -1701,20 +1701,20 @@ pltcl_SPI_execp(ClientData cdata, Tcl_Interp *interp, ...@@ -1701,20 +1701,20 @@ pltcl_SPI_execp(ClientData cdata, Tcl_Interp *interp,
{ {
int spi_rc; int spi_rc;
char buf[64]; char buf[64];
int i, volatile int i;
j; int j;
int loop_body; int loop_body;
Tcl_HashEntry *hashent; Tcl_HashEntry *hashent;
pltcl_query_desc *qdesc; pltcl_query_desc *qdesc;
char *nulls = NULL; char * volatile nulls = NULL;
char *arrayname = NULL; char * volatile arrayname = NULL;
int count = 0; int count = 0;
int callnargs; int callnargs;
static char **callargs = NULL; static char **callargs = NULL;
int loop_rc; int loop_rc;
int ntuples; int ntuples;
HeapTuple *tuples = NULL; HeapTuple * volatile tuples = NULL;
TupleDesc tupdesc = NULL; volatile TupleDesc tupdesc = NULL;
sigjmp_buf save_restart; sigjmp_buf save_restart;
char *usage = "syntax error - 'SPI_execp " char *usage = "syntax error - 'SPI_execp "
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment