@@ -150,8 +150,7 @@ createTable
150150 , SOP.SListI columns
151151 , SOP.SListI constraints
152152 , Has sch db0 schema0
153− , schema1 ~ Create table ('Table (constraints :=> columns)) schema0
154− , db1 ~ Alter sch schema1 db0 )
153+ , db1 ~ Alter sch (Create tab ('Table (constraints :=> columns)) schema0) db0 )
155154 => QualifiedAlias sch tab -- ^ the name of the table to add
156155 -> NP (Aliased (ColumnTypeExpression db0)) columns
157156 -- ^ the names and datatype of each column