[WIP] [Forgot password] render in FE
[gargantext.git] / src / Gargantext / Database / Schema / Node_NodeNgramsNodeNgrams.hs
index f4840d2b320fb2770277bb8dc24dea3bedd9c5bb..ac62bb98b3afb99e135dfe6b773031a5080bfbab 100644 (file)
@@ -31,6 +31,7 @@ Next Step benchmark:
 module Gargantext.Database.Schema.Node_NodeNgramsNodeNgrams
   where
 
+{-
 import Gargantext.Database.Schema.Prelude
 import Gargantext.Database.Admin.Types.Node (CorpusId)
 import Gargantext.Database.Schema.Node()
@@ -45,17 +46,17 @@ data Node_NodeNgrams_NodeNgrams_Poly node_id nng1_id nng2_id weight =
 
 type Node_NodeNgrams_NodeNgrams_Write =
   Node_NodeNgrams_NodeNgrams_Poly
-    (Column PGInt4          )
-    (Maybe (Column PGInt4  ))
-    (Column PGInt4          )
-    (Maybe (Column PGFloat8))
+    (Column SqlInt4          )
+    (Maybe (Column SqlInt4  ))
+    (Column SqlInt4          )
+    (Maybe (Column SqlFloat8))
 
 type Node_NodeNgrams_NodeNgrams_Read  =
   Node_NodeNgrams_NodeNgrams_Poly
-    (Column PGInt4  )
-    (Column PGInt4  )
-    (Column PGInt4  )
-    (Column PGFloat8)
+    (Column SqlInt4  )
+    (Column SqlInt4  )
+    (Column SqlInt4  )
+    (Column SqlFloat8)
 
 type ListNgramsId = Int
 
@@ -72,16 +73,16 @@ node_NodeNgrams_NodeNgrams_Table :: Table Node_NodeNgrams_NodeNgrams_Write Node_
 node_NodeNgrams_NodeNgrams_Table =
   Table "node_nodengrams_nodengrams"
        ( pNode_NodeNgrams_NodeNgrams Node_NodeNgrams_NodeNgrams
-                       { _nnn_node_id = required "node_id"
-                       , _nnn_nng1_id = optional "node_ngrams1_id"
-                       , _nnn_nng2_id = required "node_ngrams2_id"
-                       , _nnn_weight  = optional "weight"
+                       { _nnn_node_id = requiredTableField "node_id"
+                       , _nnn_nng1_id = optionalTableField "node_ngrams1_id"
+                       , _nnn_nng2_id = requiredTableField "node_ngrams2_id"
+                       , _nnn_weight  = optionalTableField "weight"
                        }
        )
 
-instance QueryRunnerColumnDefault PGInt4 (Maybe Int) where
-    queryRunnerColumnDefault = fieldQueryRunnerColumn
-
-instance QueryRunnerColumnDefault PGFloat8 (Maybe Double) where
-    queryRunnerColumnDefault = fieldQueryRunnerColumn
+instance DefaultFromField SqlInt4 (Maybe Int) where
+    defaultFromField = fromPGSFromField
 
+instance DefaultFromField SqlFloat8 (Maybe Double) where
+    defaultFromField = fromPGSFromField
+-}