Skip to content


Subversion checkout URL

You can clone with
Download ZIP
Tree: 9c4415a757
Fetching contributors…

Cannot retrieve contributors at this time

16 lines (14 sloc) 0.416 kB
{-# LANGUAGE OverloadedStrings #-}
import Binary.Fast
import Control.Monad
import Data.ByteString.Char8 (ByteString)
import System.Environment
import ThriftUtils
import qualified Data.ByteString.Char8 as SB
main = do
l <- getArgs
forM_ (map SB.pack l) $ \n -> do
m <- remoteMesh n
saveMesh (SB.append n ".lcmesh") m
-- m' <- loadMesh (SB.append n ".lcmesh")
-- print $ m == m'
Jump to Line
Something went wrong with that request. Please try again.