lecture 14: mention Only

This commit is contained in:
Joel Kaasinen
2022-01-22 10:54:42 +02:00
parent 7e4f3518fb
commit 4163ef6f3c
2 changed files with 655 additions and 649 deletions
-1
View File
@@ -19,7 +19,6 @@ addToPhonebook db name phone = execute db addQuery (name,phone)
getQuery :: Query
getQuery = Query (T.pack "SELECT phone FROM phonebook WHERE name = ?;")
-- TODO use Only?
getNumbersFor :: Connection -> String -> IO [[String]]
getNumbersFor db name = query db getQuery [name]
+655 -648
View File
File diff suppressed because it is too large Load Diff