Eleve...
[gargantext.git] / src / Gargantext / Text / Terms / Mono / Stem.hs
index ea376042352f375cf04637bfc2dd420cb7e27459..64dafe0854ed5d6beafe6f6f16d31045d0d63572 100644 (file)
@@ -55,6 +55,7 @@ stem lang = DT.pack . N.stem lang' . DT.unpack
     lang' = case lang of
               EN -> N.English
               FR -> N.French
+            --_  -> panic $ DT.pack "not implemented yet"