evalString :: LispEnv s -> T.Text -> ST s T.Text
evalString env expr = do
    eexpr <- evalExpr env expr
    case eexpr of
        Left err  -> return $ (T.pack . show) err
        Right val -> return $ (T.pack . show) val
evalString :: LispEnv s -> T.Text -> ST s T.Text
evalString env expr = do
    eexpr <- evalExpr env expr
    case eexpr of
        Left err  -> return $ (T.pack . show) err
        Right val -> return $ (T.pack . show) val
evalString env expr = do
    eexpr <- evalExpr env expr
    case eexpr of
        Left err  -> return $ (T.pack . show) err
        Right val -> return $ (T.pack . show) val