(Est) get rid of most lock field warnings

2022-07-25 17:38:35 +02:00
parent 728bb1faf9
commit afe76e1fe0
11 changed files with 60 additions and 59 deletions
@@ -216,8 +216,7 @@ concrete NounEst of Noun = CatEst ** open ResEst, HjkEst, MorphoEst, Prelude in

  oper
    numN : NForm -> Number = \nf -> case nf of {
-      NCase n _ => n ;
-      _ => Sg ---
+      NCase n _ => n
      } ;