steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

db.errors.sqlite: don't give up on bad inputs

db4
Slava Pestov 2009-04-06 22:00:08 -05:00
parent 959e659cdc
commit 2e03bd5cc0
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/db/errors/sqlite/sqlite.factor
View File

@ -4,7 +4,8 @@ USING: accessors combinators db kernel sequences peg.ebnf
strings db.errors ; strings db.errors ;
IN: db.errors.sqlite IN: db.errors.sqlite
ERROR: unparsed-sqlite-error error ; TUPLE: unparsed-sqlite-error error ;
C: <unparsed-sqlite-error> unparsed-sqlite-error
SINGLETONS: table-exists table-missing ; SINGLETONS: table-exists table-missing ;
@ -22,4 +23,6 @@ SqliteError =
=> [[ table >string message sqlite-table-error ]] => [[ table >string message sqlite-table-error ]]
| "no such table: " .+:table | "no such table: " .+:table
=> [[ table >string <sql-table-missing> ]] => [[ table >string <sql-table-missing> ]]
| .*:error
=> [[ error >string <unparsed-sqlite-error> ]]
;EBNF ;EBNF