From 00111b10c193ccca6c37b356bf2d4ce67cb69975 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Mon, 6 Dec 2010 09:53:04 +0000
Subject: vt -api with conversion to resource API names

---
 src/runtime/haskell/PGF/ToApi.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'src/runtime')

diff --git a/src/runtime/haskell/PGF/ToApi.hs b/src/runtime/haskell/PGF/ToApi.hs
index 41ccb2248..e22132c34 100644
--- a/src/runtime/haskell/PGF/ToApi.hs
+++ b/src/runtime/haskell/PGF/ToApi.hs
@@ -1,5 +1,5 @@
 module PGF.ToAPI 
- (stringToAPI,exprToAPI)
+ (stringToAPI,exprToAPI,exprToAPIIO)
   where
 
 import PGF.Expr
@@ -14,6 +14,10 @@ import qualified Data.Map as Map
 import PGF.Signature
 
 
+--- this will be changed
+exprToAPIIO :: Expr -> IO String
+exprToAPIIO = exprToAPI   -- return . exprToAPI
+
 
 -- intermediate structure for representing the translated expression
 data APIfunc = BasicFunc String | AppFunc String [APIfunc] | NoAPI  
-- 
cgit v1.2.3