diff options
author | Marc G. Fournier <scrappy@hub.org> | 1996-10-07 21:19:09 +0000 |
---|---|---|
committer | Marc G. Fournier <scrappy@hub.org> | 1996-10-07 21:19:09 +0000 |
commit | 4e8f5c337cc46f30471346b968f03413408425b2 (patch) | |
tree | 8460daaad302ebe97961f5779ccdee17d468c055 /src/interfaces/libpgtcl/pgtcl.c | |
parent | ea733aa997f0d3d71ae530485706b5ed76d02fd5 (diff) | |
download | postgresql-4e8f5c337cc46f30471346b968f03413408425b2.tar.gz postgresql-4e8f5c337cc46f30471346b968f03413408425b2.zip |
Well I haven't received any feedback pro or con re my suggested new Tcl
function so I am going to assume that it is such a good idea that no
one sees any point in discussing it. :-) I have made two changes -
I have merged this into pgtclCmds.c and I have taken out any code for
updating tuples after the loop body runs. See comments for discussion
of this.
I have also fixed up the error checking stuff so that break, continue
and syntax errors have the expected result.
Submitted by: D'Arcy Cain
Diffstat (limited to 'src/interfaces/libpgtcl/pgtcl.c')
-rw-r--r-- | src/interfaces/libpgtcl/pgtcl.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/interfaces/libpgtcl/pgtcl.c b/src/interfaces/libpgtcl/pgtcl.c index 449107339fe..f3758cd8fb1 100644 --- a/src/interfaces/libpgtcl/pgtcl.c +++ b/src/interfaces/libpgtcl/pgtcl.c @@ -9,7 +9,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.1.1.1 1996/07/09 06:22:16 scrappy Exp $ + * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.2 1996/10/07 21:19:06 scrappy Exp $ * *------------------------------------------------------------------------- */ @@ -45,6 +45,11 @@ Pg_Init (Tcl_Interp *interp) (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL); Tcl_CreateCommand(interp, + "pg_select", + Pg_select, + (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL); + + Tcl_CreateCommand(interp, "pg_result", Pg_result, (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL); |