Correctly compute ngram ratios for queries with less than NGRAM_N characters

Cloogle/DB.icl

@@ -394,12 +394,12 @@ where
 	# rn = toReal n
 	# annots =
 		[ MatchingNGramsQuery  (rn / qsize)
-		, MatchingNGramsResult (rn / toReal (length $ 'NGrams'.ngrams NGRAMS_CI NGRAMS_N name))
+		, MatchingNGramsResult (rn / toReal (max 1 $ length $ 'NGrams'.ngrams NGRAMS_CI NGRAMS_N name))
 		]
 	= ((idx, annots), db)
 
 	cs = [c \\ c <-: s]
-	qsize = toReal $ length $ 'NGrams'.ngrams NGRAMS_CI NGRAMS_N s
+	qsize = toReal $ max 1 $ length $ 'NGrams'.ngrams NGRAMS_CI NGRAMS_N s
 
 	syntaxSearch :: CloogleEntry -> (Bool, [a])
 	syntaxSearch (SyntaxEntry se) = (any (not o isEmpty o flip match cs) se.syntax_patterns, [])