|
3 | 3 | * procedural language (PL)
|
4 | 4 | *
|
5 | 5 | * IDENTIFICATION
|
6 |
| - * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.18 2000/01/15 22:43:23 tgl Exp $ |
| 6 | + * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.19 2000/02/27 07:18:29 tgl Exp $ |
7 | 7 | *
|
8 | 8 | * This software is copyrighted by Jan Wieck - Hamburg.
|
9 | 9 | *
|
@@ -417,7 +417,7 @@ pltcl_func_handler(FmgrInfo *proinfo,
|
417 | 417 | char*stroid;
|
418 | 418 | Tcl_HashEntry*hashent;
|
419 | 419 | inthashnew;
|
420 |
| -pltcl_proc_desc*prodesc; |
| 420 | +pltcl_proc_desc*volatileprodesc; |
421 | 421 | Tcl_DStringtcl_cmd;
|
422 | 422 | Tcl_DStringlist_tmp;
|
423 | 423 | inttcl_rc;
|
@@ -739,7 +739,7 @@ pltcl_trigger_handler(FmgrInfo *proinfo)
|
739 | 739 | inthashnew;
|
740 | 740 | pltcl_proc_desc*prodesc;
|
741 | 741 | TupleDesctupdesc;
|
742 |
| -HeapTuplerettup; |
| 742 | +volatileHeapTuplerettup; |
743 | 743 | Tcl_DStringtcl_cmd;
|
744 | 744 | Tcl_DStringtcl_trigtup;
|
745 | 745 | Tcl_DStringtcl_newtup;
|
@@ -1289,13 +1289,13 @@ pltcl_SPI_exec(ClientData cdata, Tcl_Interp *interp,
|
1289 | 1289 | intspi_rc;
|
1290 | 1290 | charbuf[64];
|
1291 | 1291 | intcount=0;
|
1292 |
| -char*arrayname=NULL; |
1293 |
| -intquery_idx; |
| 1292 | +char*volatilearrayname=NULL; |
| 1293 | +volatileintquery_idx; |
1294 | 1294 | inti;
|
1295 | 1295 | intloop_rc;
|
1296 | 1296 | intntuples;
|
1297 |
| -HeapTuple*tuples; |
1298 |
| -TupleDesctupdesc=NULL; |
| 1297 | +HeapTuple*volatiletuples; |
| 1298 | +volatileTupleDesctupdesc=NULL; |
1299 | 1299 | sigjmp_bufsave_restart;
|
1300 | 1300 |
|
1301 | 1301 | char*usage="syntax error - 'SPI_exec "
|
@@ -1701,20 +1701,20 @@ pltcl_SPI_execp(ClientData cdata, Tcl_Interp *interp,
|
1701 | 1701 | {
|
1702 | 1702 | intspi_rc;
|
1703 | 1703 | charbuf[64];
|
1704 |
| -inti, |
1705 |
| -j; |
| 1704 | +volatileinti; |
| 1705 | +intj; |
1706 | 1706 | intloop_body;
|
1707 | 1707 | Tcl_HashEntry*hashent;
|
1708 | 1708 | pltcl_query_desc*qdesc;
|
1709 |
| -char*nulls=NULL; |
1710 |
| -char*arrayname=NULL; |
| 1709 | +char*volatilenulls=NULL; |
| 1710 | +char*volatilearrayname=NULL; |
1711 | 1711 | intcount=0;
|
1712 | 1712 | intcallnargs;
|
1713 | 1713 | staticchar**callargs=NULL;
|
1714 | 1714 | intloop_rc;
|
1715 | 1715 | intntuples;
|
1716 |
| -HeapTuple*tuples=NULL; |
1717 |
| -TupleDesctupdesc=NULL; |
| 1716 | +HeapTuple*volatiletuples=NULL; |
| 1717 | +volatileTupleDesctupdesc=NULL; |
1718 | 1718 | sigjmp_bufsave_restart;
|
1719 | 1719 |
|
1720 | 1720 | char*usage="syntax error - 'SPI_execp "
|
|