1
0
forked from GitHub/gf-rgl

small adjustments in Make.hs and some resources to make the lib compile with less warnings and without errors

This commit is contained in:
aarne
2010-04-14 16:25:17 +00:00
parent d361b2ed0f
commit 0beda69f6c
11 changed files with 127 additions and 57 deletions

View File

@@ -48,8 +48,8 @@ oper
mkAdject : (_,_,_,_,_ : Str) -> Adj =
\stor,stort,store,storre,storst -> {s = table {
AF (APosit (Strong SgUtr )) c => mkCase c stor ;
AF (APosit (Strong SgNeutr)) c => mkCase c stort ;
AF (APosit (Strong (GSg Utr))) c => mkCase c stor ;
AF (APosit (Strong (GSg Neutr))) c => mkCase c stort ;
AF (APosit _) c => mkCase c store ;
AF ACompar c => mkCase c storre ;
AF (ASuperl SupStrong) c => mkCase c storst ;