|
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 " |
|