|
1 | | -/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.231 2003/06/13 10:50:57 meskes Exp $*/ |
| 1 | +/* $Header: /cvsroot/pgsql/src/interfaces/ecpg/preproc/Attic/preproc.y,v 1.232 2003/06/16 16:58:11 meskes Exp $*/ |
2 | 2 |
|
3 | 3 | /* Copyright comment*/ |
4 | 4 | %{ |
@@ -630,15 +630,15 @@ stmt: AlterDatabaseSetStmt{ output_statement($1, 0, connection); } |
630 | 630 | |ECPGDeallocate |
631 | 631 | { |
632 | 632 | if (connection) |
633 | | -mmerror(PARSE_ERROR, ET_ERROR,"no at option for connect statement.\n"); |
634 | | - |
635 | | -fputc('{', yyout); |
636 | | -fputs($1, yyout); |
| 633 | +mmerror(PARSE_ERROR, ET_ERROR,"no at option for deallocate statement.\n"); |
| 634 | +fprintf(yyout,"{ ECPGdeallocate(__LINE__,\"%s\");", $1); |
637 | 635 | whenever_action(2); |
638 | 636 | free($1); |
639 | 637 | } |
640 | 638 | |ECPGDeallocateDescr |
641 | 639 | { |
| 640 | +if (connection) |
| 641 | +mmerror(PARSE_ERROR, ET_ERROR,"no at option for deallocate statement.\n"); |
642 | 642 | fprintf(yyout,"ECPGdeallocate_desc(__LINE__, %s);",$1); |
643 | 643 | whenever_action(0); |
644 | 644 | free($1); |
@@ -4294,9 +4294,9 @@ ECPGCursorStmt: DECLARE name cursor_options CURSOR opt_hold FOR ident |
4294 | 4294 | * prepared statement |
4295 | 4295 | */ |
4296 | 4296 | ECPGDeallocate:DEALLOCATEPREPAREident |
4297 | | -{$$ =cat_str(3, make_str("ECPGdeallocate(__LINE__,\""),$3, make_str("\");")); } |
| 4297 | +{$$ =$3; } |
4298 | 4298 | |DEALLOCATEident |
4299 | | -{$$ =cat_str(2, make_str("ECPGdeallocate(__LINE__,\""),$2, make_str("\");")); } |
| 4299 | +{$$ =$2; } |
4300 | 4300 | ; |
4301 | 4301 |
|
4302 | 4302 | /* |
|
