Commitfbe9d1a

committed

Fix for "--" comment and no trailing newline, as seen in Perl.

1 parentae61ef3 commitfbe9d1aCopy full SHA for fbe9d1a

File tree

-4

lines changed

-4

lines changed

Lines changed: 2 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -8,7 +8,7 @@`
`8`	`8`	`*`
`9`	`9`	`*`
`10`	`10`	`* IDENTIFICATION`
`11`		`- * $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.57 1999/09/2803:41:36 momjian Exp $`
	`11`	`+ * $Header: /cvsroot/pgsql/src/backend/parser/scan.l,v 1.58 1999/10/08 05:03:13 momjian Exp $`
`12`	`12`	`*`
`13`	`13`	`*-------------------------------------------------------------------------`
`14`	`14`	`*/`
`@@ -167,7 +167,7 @@ real(((({digit}\.{digit}+)\|({digit}+\.{digit}))([Ee][-+]?{digit}+)?)\|({dig`
`167`	`167`
`168`	`168`	`param\${integer}`
`169`	`169`
`170`		`-comment("--"\|"//").*\n`
	`170`	`+comment("--"\|"//").*`
`171`	`171`
`172`	`172`	`space[\t\n\f]`
`173`	`173`	`other.`

Lines changed: 2 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -1,6 +1,6 @@`
`1`	`1`	`#!/usr/local/bin/perl -w`
`2`	`2`
`3`		`-# $Id: test.pl,v 1.9 1998/09/27 19:12:26 mergl Exp $`
	`3`	`+# $Id: test.pl,v 1.10 1999/10/08 05:03:14 momjian Exp $`
`4`	`4`
`5`	`5`	# Before `make install' is performed this script should be runnable with
`6`	`6`	# `make test'. After `make install' it should work as `perl test.pl'
`@@ -147,7 +147,7 @@`
`147`	`147`
`148`	`148`	`######################### create and insert into table`
`149`	`149`
`150`		`-$result =$conn->exec("CREATE TABLE person (id int4, name char(16))");`
	`150`	`+$result =$conn->exec("CREATE TABLE person (id int4, name char(16)) -- test");`
`151`	`151`	`die$conn->errorMessageunless PGRES_COMMAND_OKeq$result->resultStatus;`
`152`	`152`	`my$cmd =$result->cmdStatus;`
`153`	`153`	`("CREATE"eq$cmd )`

Comments

(0)