diff --git a/dbdimp.c b/dbdimp.c
index 2683f54..f4998b9 100644
--- a/dbdimp.c
+++ b/dbdimp.c
@@ -2121,12 +2121,12 @@ static int perl_tokenizer_Create(
     dSP;
     int n_retval;
     SV *retval;
+    perl_tokenizer *t;
 
     if (!argc) {
         return SQLITE_ERROR;
     }
 
-    perl_tokenizer *t;
     t = (perl_tokenizer *) sqlite3_malloc(sizeof(*t));
     if( t==NULL ) return SQLITE_NOMEM;
     memset(t, 0, sizeof(*t));