From fa0e09c65b849b7bad86bfd457e7cf7b0771df9a Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Thu, 14 May 2009 08:15:36 -0400 Subject: Testing custom paths --- tests/aux/aux.ur | 1 + tests/pathmap.ur | 3 ++- tests/pathmap.urp | 2 ++ 3 files changed, 5 insertions(+), 1 deletion(-) create mode 100644 tests/aux/aux.ur diff --git a/tests/aux/aux.ur b/tests/aux/aux.ur new file mode 100644 index 00000000..41edf353 --- /dev/null +++ b/tests/aux/aux.ur @@ -0,0 +1 @@ +val hello = "Hello!" diff --git a/tests/pathmap.ur b/tests/pathmap.ur index 44699048..2ce1f5f0 100644 --- a/tests/pathmap.ur +++ b/tests/pathmap.ur @@ -3,5 +3,6 @@ val y = List.mp (plus 2) x fun main () : transaction page = return {[x]}
- {[y]} + {[y]}
+ {[Aux.hello]} diff --git a/tests/pathmap.urp b/tests/pathmap.urp index 1270b40c..70373e65 100644 --- a/tests/pathmap.urp +++ b/tests/pathmap.urp @@ -1,3 +1,5 @@ +path extra=aux $/list +$extra/aux pathmap -- cgit v1.2.3