@@ -1240,7 +1240,8 @@ instance ToJSON MemoryConstraint where
1240instance FromJSON MemoryConstraint where
1240instance FromJSON MemoryConstraint where
1241 parseJSON (JSON.Number x) = case (floatingOrInteger x) of
1241 parseJSON (JSON.Number x) = case (floatingOrInteger x) of
1242 Left (_ :: Double) -> fail "Failed to parse MemoryConstraint"
1242 Left (_ :: Double) -> fail "Failed to parse MemoryConstraint"
1243+ Right i -> return $ MemoryConstraint i B
1243− Right i -> return $ MemoryConstraint i B -- | The docker daemon will always return the number as bytes (integer), regardless of how we set them (using MB or GB)
1244+ -- The docker daemon will always return the number as bytes (integer), regardless of how we set them (using MB or GB)
1244 parseJSON _ = fail "Failed to parse MemoryConstraint"
1245 parseJSON _ = fail "Failed to parse MemoryConstraint"
1246data ContainerResources = ContainerResources {
1247data ContainerResources = ContainerResources {