GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-18 17:29:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

use the syntax <x : A> in PGF.Expr for typed expressions. This is consistent with the GF language

Browse Source
This commit is contained in:
krasimir
2009-09-19 10:16:37 +00:00
parent 2bb3229a84
commit fd63cdaeed
4 changed files with 37 additions and 66 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
testsuite/runtime/eval/eval.gfs
View File

@@ -1,28 +1,28 @@
i -src testsuite/runtime/eval/Test.gf
pt -compute \x -> x 1 : (Int->Int)->Int
pt -compute (? : Int -> Int) 1
pt -compute (\x -> x 1 : (Int->Int)->Int) ?
pt -compute <\x -> x 1 : (Int->Int)->Int>
pt -compute <? : Int -> Int> 1
pt -compute <\x -> x 1 : (Int->Int)->Int> ?
pt -compute f 1 2
pt -compute \x -> x : Nat -> Nat
pt -compute ? : String
pt -compute <\x -> x : Nat -> Nat>
pt -compute <? : String>
pt -compute f
pt -compute (\x -> x 2 : (Int->Int)->Int) (f 1)
pt -compute <\x -> x 2 : (Int->Int)->Int> (f 1)
pt -compute g 1
pt -compute g 0
pt -compute \x -> g x : Int -> Int
pt -compute <\x -> g x : Int -> Int>
pt -compute g ?
pt -compute (\x -> x 5 : (Int->Int)->Int) (g2 1)
pt -compute (\x -> x 3 : (Int->Int)->Int) (\x -> x)
pt -compute <\x -> x 5 : (Int->Int)->Int> (g2 1)
pt -compute <\x -> x 3 : (Int->Int)->Int> (\x -> x)
pt -compute g0
pt -compute (\x -> x 32 : (Int -> Int -> Int) -> Int -> Int) (\x -> f x : Int -> Int -> Int)
pt -compute <\x -> x 32 : (Int -> Int -> Int) -> Int -> Int> <\x -> f x : Int -> Int -> Int>
pt -compute g0 23
pt -compute const 3.14 "pi"
pt -compute dec (succ (succ zero))
pt -compute dec (succ ?)
pt -compute \x -> dec x : Nat -> Nat
pt -compute <\x -> dec x : Nat -> Nat>
pt -compute dec ?
pt -compute (\f -> f 0 : (Int -> Int) -> Int) (g3 ?)
pt -compute <\f -> f 0 : (Int -> Int) -> Int> (g3 ?)
pt -compute g (g2 ? 0)
pt -compute plus (succ zero) (succ zero)
pt -compute dec2 0 (succ zero)