Fix Parent Relation when having many views(#1044)

This commit is contained in:
steve-chavez
2018-03-17 07:53:41 -05:00
committed by Steve Chávez
parent ff709a65e5
commit 349a5ae076
7 changed files with 148 additions and 55 deletions
+3 -1
View File
@@ -107,7 +107,9 @@ data Column =
, colFK :: Maybe ForeignKey
} deriving (Show, Ord)
type Synonym = (Column,Column)
-- | A view column that refers to a table column
type Synonym = (Column, ViewColumn)
type ViewColumn = Column
data PrimaryKey = PrimaryKey {
pkTable :: Table