Commit 2113c746 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] insertOn conflict do Nothing.

parent 9a81c0df
Pipeline #57 failed with stage
......@@ -12,6 +12,10 @@ else
echo " or : adduser $(whoami) docker"
fi
sudo echo "#!/bin/sh
exec sudo -E /usr/bin/docker \"\$@\"" > /usr/local/bin/docker
sudo chmod +x /usr/local/bin/docker
curl -sSL https://get.haskellstack.org/ | sh
stack update
stack upgrade
......
......@@ -103,9 +103,13 @@ insertNodeNgrams = insertNodeNgramW
insertNodeNgramW :: [NodeNgramWrite] -> Cmd Int
insertNodeNgramW nns =
mkCmd $ \c -> fromIntegral
<$> runInsertMany c nodeNgramTable nns
-- <$> runInsertManyOnConflictDoNothing c nodeNgramTable nns
mkCmd $ \c -> fromIntegral <$> runInsert_ c insertNothing
where
insertNothing = (Insert { iTable = nodeNgramTable
, iRows = nns
, iReturning = rCount
, iOnConflict = Nothing
})
type NgramsText = Text
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment