1
0
forked from GitHub/gf-core

one more instance of symb in Symbolic

This commit is contained in:
aarne
2012-06-10 14:11:47 +00:00
parent 8ef8af479f
commit b2973b9c08

View File

@@ -4,6 +4,7 @@ incomplete resource Symbolic = open Symbol, Grammar, PredefCnc in {
oper
symb : overload {
symb : Symb -> NP ; -- x
symb : Str -> NP ; -- x
symb : Int -> NP ; -- 23
symb : Float -> NP ; -- 0.99
@@ -31,9 +32,13 @@ incomplete resource Symbolic = open Symbol, Grammar, PredefCnc in {
mkInteger : Predef.Int -> Integer ;
mkFloating : Predef.Float -> Floating ;
Symb : Type
= Symbol.Symb ;
--.
symb = overload {
symb : Symb -> NP
= \s -> UsePN (SymbPN s) ;
symb : Str -> NP
= \s -> UsePN (SymbPN (mkSymb s)) ;
symb : Int -> NP