1
0
forked from GitHub/gf-core

some more tests for evaluation in the abstract syntax

This commit is contained in:
krasimir
2009-05-20 20:27:19 +00:00
parent 38d5846b44
commit f9574dcf77
3 changed files with 38 additions and 0 deletions

View 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 ;
}

View 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

View File

@@ -0,0 +1,12 @@
\v0 -> v0
1
\v0 -> v0