diff --git a/src/parsers/parse-sqlite-type-name.lisp b/src/parsers/parse-sqlite-type-name.lisp
index 09eb0e8..e6adae4 100644
--- a/src/parsers/parse-sqlite-type-name.lisp
+++ b/src/parsers/parse-sqlite-type-name.lisp
@@ -31,7 +31,7 @@
 (defrule sqlite-typemod (or sqlite-double-typemod sqlite-single-typemod))
 
 (defrule sqlite-type-name (and (* extra-qualifiers)
-                               (+ (alpha-char-p character))
+                               (+ (or (alpha-char-p character) #\_))
                                (* extra-qualifiers)
                                ignore-whitespace
                                (? sqlite-typemod)