case endings in Fin symbols: Nom is a special case, since there is no ending

This commit is contained in:
aarne
2013-03-12 20:29:31 +00:00
parent 367123c81b
commit f61a013a40
2 changed files with 11 additions and 3 deletions

View File

@@ -966,5 +966,13 @@ oper
Abess => "tta"
} ;
bindIf : Case -> Str = \c -> case c of {
Nom => [] ;
_ => BIND
} ;
bindColonIf : Case -> Str = \c -> case c of {
Nom => [] ;
_ => BIND ++ ":" ++ BIND
} ;
}