commit b0ec930ea972671db749ceb72386ef8f07f3b1be
parent 18c8b496007ea51a05a0ef2ce03e436016552de4
Author: Antoine Amarilli <a3nm@a3nm.net>
Date: Mon, 30 May 2011 15:25:50 -0400
add que/qu' to detect.pl
Diffstat:
1 file changed, 2 insertions(+), 0 deletions(-)
diff --git a/detect.pl b/detect.pl
@@ -14,6 +14,8 @@ while (<>) {
# we store in asp what the current word indicates about the next word
$asp = -1; # default is unknown
$asp = 0 if /^[lj]'$/;
+ $asp = 0 if /^qu'$/;
+ $asp = 1 if /^que$/;
$asp = 0 if /^cet$/;
$asp = 1 if /^ce$/;
# only meaningful are "je", "de", "le" and "la"