Commit d5f36fab authored by auraes's avatar auraes 💬
Browse files

La suppression de l'apostrophe posait des problèmes avec le pronom l'

parent 03a15eaa
......@@ -27,9 +27,6 @@ Constant DE_A_JOUER;
Constant INITIAL_LOCATION_VALUE = FaceMontagne;
! Pour une saisie sans accents, il est possible d'utiliser AccentuerNom() ou de
! rajouter le nom, non accentué, de l'objet dans la propriété name
Include "globals.h";
Include "puny.h";
......
......@@ -8,9 +8,6 @@
System_file;
!FRENCH
! TODO optimiser tout cela
! éviter le plus possible les appels à Tokenise__()
! voir s'il n'est pas préférable, pour les modifications, de les faire dans
! parser au lieu de buffer
[ DictWord at len w i j len_dic;
len_dic = (dict_end-dict_start)/dict_entry_size; !TODO Global
......@@ -56,13 +53,6 @@ System_file;
p->1 = c;
];
[ PrintToBuffer str;
@output_stream 3 StorageForShortName;
print (string) str;
@output_stream -3;
return StorageForShortName-->0; !Warning si débordement
];
[ LanguagePronom w;
switch (w) {
'-l^': print "l'"; !TODO
......@@ -91,10 +81,8 @@ System_file;
[ DecolleApostrophe motn at lgm; !TODO ssi l' ou d' ?
at = PosMot(motn) + 1;
lgm = WordLength(motn);
if (lgm > 1 && buffer->at == ''') {
buffer->at = 'e';
if (lgm > 1 && buffer->at == ''')
LTI_Insert(++at, ' ');
}
else rfalse;
];
......@@ -117,7 +105,7 @@ System_file;
parse->(i*4) = 1;
continue;
}
if (w == 'du') {
if (w == 'd^' or 'du') {
parse-->(i*2-1) = 'de';
continue;
}
......@@ -147,7 +135,7 @@ System_file;
!TODO optimiser
r = 2;
switch (w) { !y en
'se': r = 1; !s'y asseoir/balancer/suspendre
'se', 's^': r = 1; !s'y asseoir/balancer/suspendre
'l^': w = '-l^'; r = 1;
'le':
w = '-le';
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment