Mercurial > urweb

comparison src/sqlite.sml @ 1359:e525ad571e15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Recursive record unification errors, for more detail
author Adam Chlipala <adam@chlipala.net>
date Thu, 23 Dec 2010 11:23:31 -0500
parents 703c2c94afd5
children 969b90b1f2f9
comparison
equal deleted inserted replaced
1358:32c8a3509369 1359:e525ad571e15
595 string ", ", 595 string ", ",
596 arg, 596 arg,
597 string ")"] 597 string ")"]
598 | Time => box [string "sqlite3_bind_text(stmt, ", 598 | Time => box [string "sqlite3_bind_text(stmt, ",
599 string (Int.toString (i + 1)), 599 string (Int.toString (i + 1)),
600 string ", uw_Basis_timeToStringf(ctx, ", 600 string ", uw_Basis_timef(ctx, ",
601 string fmt, 601 string fmt,
602 string ", ", 602 string ", ",
603 arg, 603 arg,
604 string "), -1, SQLITE_TRANSIENT)"] 604 string "), -1, SQLITE_TRANSIENT)"]
605 | Blob => box [string "sqlite3_bind_blob(stmt, ", 605 | Blob => box [string "sqlite3_bind_blob(stmt, ",