) or die $sqlt->error;
is($sql, << "SQL");
-DROP TABLE "Basic";
+DROP TABLE "Basic" CASCADE;
CREATE TABLE "Basic" (
"id" serial NOT NULL,
"title" character varying(100) DEFAULT 'hello' NOT NULL,
"explicitemptystring" character varying DEFAULT '',
-- Hello emptytagdef
"emptytagdef" character varying DEFAULT '',
+ "another_id" integer DEFAULT '2',
"timest" timestamp(0),
PRIMARY KEY ("id"),
Constraint "emailuniqueindex" UNIQUE ("email")
);
CREATE INDEX "titleindex" on "Basic" ("title");
+
+
+DROP TABLE "Another" CASCADE;
+CREATE TABLE "Another" (
+ "id" serial NOT NULL,
+ PRIMARY KEY ("id")
+);
+
+
+
+CREATE OR REPLACE VIEW "email_list" ( "email" ) AS (
+ SELECT email FROM Basic WHERE email IS NOT NULL
+ );
+
+ALTER TABLE "Basic" ADD FOREIGN KEY ("another_id")
+ REFERENCES "Another" ("id") DEFERRABLE;
SQL