mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
some more tests for evaluation in the abstract syntax
This commit is contained in:
17
testsuite/paraphrase/lambda.gf
Normal file
17
testsuite/paraphrase/lambda.gf
Normal file
@@ -0,0 +1,17 @@
|
||||
abstract lambda = {
|
||||
|
||||
fun f1 : Int -> Int ;
|
||||
def f1 = (\x -> x) ;
|
||||
|
||||
fun f2 : Int ;
|
||||
def f2 = f1 1 ;
|
||||
|
||||
cat D ;
|
||||
data D1 : D ;
|
||||
D2 : D ;
|
||||
|
||||
fun d : D -> Int -> Int ;
|
||||
def d D1 = \x -> x ;
|
||||
d D2 = \x -> 2 ;
|
||||
|
||||
}
|
||||
9
testsuite/paraphrase/lambda.gfs
Normal file
9
testsuite/paraphrase/lambda.gfs
Normal file
@@ -0,0 +1,9 @@
|
||||
i testsuite/paraphrase/lambda.gf
|
||||
|
||||
pt -compute f1
|
||||
pt -compute f2
|
||||
|
||||
pt -compute d D1
|
||||
pt -compute d D2
|
||||
pt -compute d D1 1
|
||||
pt -compute d D2 1
|
||||
12
testsuite/paraphrase/lambda.gfs.gold
Normal file
12
testsuite/paraphrase/lambda.gfs.gold
Normal file
@@ -0,0 +1,12 @@
|
||||
\v0 -> v0
|
||||
|
||||
|
||||
|
||||
1
|
||||
|
||||
|
||||
|
||||
\v0 -> v0
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user