From e9e80fc389365e24d4300d7d5390c7d833a96c50 Mon Sep 17 00:00:00 2001
From: aarne <aarne@cs.chalmers.se>
Date: Wed, 25 Jun 2008 16:54:35 +0000
Subject: changed names of resource-1.3; added a note on homepage on release

---
 examples/tutorial/embedded/Translator.hs | 16 ----------------
 1 file changed, 16 deletions(-)
 delete mode 100644 examples/tutorial/embedded/Translator.hs

(limited to 'examples/tutorial/embedded/Translator.hs')

diff --git a/examples/tutorial/embedded/Translator.hs b/examples/tutorial/embedded/Translator.hs
deleted file mode 100644
index c227420f6..000000000
--- a/examples/tutorial/embedded/Translator.hs
+++ /dev/null
@@ -1,16 +0,0 @@
-module Main where
-
-import GF.Embed.EmbedAPI
-import System (getArgs)
-
-main :: IO () 
-main = do
-  file:_ <- getArgs
-  gr <- file2grammar file
-  interact (translate gr)
-
-translate :: MultiGrammar -> String -> String
-translate gr = unlines . map transLine . lines where
-  transLine s =
-    let (lang,tree:_):_ = parseAllLang gr (startCat gr) s
-    in unlines [linearize gr lg tree | lg <- languages gr, lg /= lang]      
-- 
cgit v1.2.3