Index: gc_core/js/lang_core/gc_functions.js
==================================================================
--- gc_core/js/lang_core/gc_functions.js
+++ gc_core/js/lang_core/gc_functions.js
@@ -200,23 +200,20 @@
         }
     }
     return false;
 }
 
-function g_morph (oToken, sPattern, sNegPattern="", nLeft=null, nRight=null, bMemorizeMorph=true) {
+function g_morph (oToken, sPattern, sNegPattern="", nLeft=null, nRight=null) {
     // analyse a token, return True if <sNegPattern> not in morphologies and <sPattern> in morphologies
     let lMorph;
     if (oToken.hasOwnProperty("lMorph")) {
         lMorph = oToken["lMorph"];
     }
     else {
         if (nLeft !== null) {
             let sValue = (nRight !== null) ? oToken["sValue"].slice(nLeft, nRight) : oToken["sValue"].slice(nLeft);
             lMorph = gc_engine.oSpellChecker.getMorph(sValue);
-            if (bMemorizeMorph) {
-                oToken["lMorph"] = lMorph;
-            }
         } else {
             lMorph = gc_engine.oSpellChecker.getMorph(oToken["sValue"]);
         }
     }
     if (lMorph.length == 0) {

Index: gc_core/py/lang_core/gc_functions.py
==================================================================
--- gc_core/py/lang_core/gc_functions.py
+++ gc_core/py/lang_core/gc_functions.py
@@ -186,19 +186,17 @@
         if sValue in sValues:
             return True
     return False
 
 
-def g_morph (dToken, sPattern, sNegPattern="", nLeft=None, nRight=None, bMemorizeMorph=True):
+def g_morph (dToken, sPattern, sNegPattern="", nLeft=None, nRight=None):
     "analyse a token, return True if <sNegPattern> not in morphologies and <sPattern> in morphologies"
     if "lMorph" in dToken:
         lMorph = dToken["lMorph"]
     else:
         if nLeft is not None:
             lMorph = _oSpellChecker.getMorph(dToken["sValue"][slice(nLeft, nRight)])
-            if bMemorizeMorph:
-                dToken["lMorph"] = lMorph
         else:
             lMorph = _oSpellChecker.getMorph(dToken["sValue"])
     if not lMorph:
         return False
     # check negative condition

Index: gc_lang/fr/modules-js/gce_analyseur.js
==================================================================
--- gc_lang/fr/modules-js/gce_analyseur.js
+++ gc_lang/fr/modules-js/gce_analyseur.js
@@ -11,11 +11,11 @@
         }
         else if (oToken["sValue"].search(/-l(?:es?|a)-(?:[mt]oi|nous|leur)$|(?:[nv]ous|lui|leur)-en$/) != -1) {
             nEnd = oToken["sValue"].slice(0,nEnd).lastIndexOf("-");
         }
     }
-    return g_morph(oToken, sPattern, sNegPattern, 0, nEnd, false);
+    return g_morph(oToken, sPattern, sNegPattern, 0, nEnd);
 }
 
 function apposition (sWord1, sWord2) {
     // returns true if nom + nom (no agreement required)
     return sWord2.length < 2 || (cregex.mbNomNotAdj(gc_engine.oSpellChecker.getMorph(sWord2)) && cregex.mbPpasNomNotAdj(gc_engine.oSpellChecker.getMorph(sWord1)));

Index: gc_lang/fr/modules/gce_analyseur.py
==================================================================
--- gc_lang/fr/modules/gce_analyseur.py
+++ gc_lang/fr/modules/gce_analyseur.py
@@ -9,11 +9,11 @@
     if dToken["sValue"].count("-") > 1:
         if "-t-" in dToken["sValue"]:
             nEnd = nEnd - 2
         elif re.search("-l(?:es?|a)-(?:[mt]oi|nous|leur)$|(?:[nv]ous|lui|leur)-en$", dToken["sValue"]):
             nEnd = dToken["sValue"][0:nEnd].rfind("-")
-    return g_morph(dToken, sPattern, sNegPattern, 0, nEnd, False)
+    return g_morph(dToken, sPattern, sNegPattern, 0, nEnd)
 
 
 def apposition (sWord1, sWord2):
     "returns True if nom + nom (no agreement required)"
     return len(sWord2) < 2 or (cr.mbNomNotAdj(_oSpellChecker.getMorph(sWord2)) and cr.mbPpasNomNotAdj(_oSpellChecker.getMorph(sWord1)))