Andrey Sverdlichenko rblaze

Brookline, MA

Recently created

Least recently created

Recently updated

Least recently updated

rblaze / gist:2894934

Created June 8, 2012 10:34

	class ast_node {};

	class retrn : public ast_node {
	retrn(vector<expr *>);
	}

	class expr : public ast_node {};

	class intconst : public expr {};

rblaze / Вход

Created June 9, 2012 15:42

	module LangParser(parseGrammar, Token(..), Result(..)) where

	import Control.Applicative
	import Control.Monad
	--import Debug.Trace

	data Token =
	Return \|
	Simple Char \|
	OctalConst String \|

rblaze / analyze.bs8.hs

Created July 31, 2012 11:56

Соревнования на скорость парсинга

	{-# LANGUAGE BangPatterns #-}
	module Main where

	import qualified Data.ByteString.Lazy.Char8 as BS
	import Data.IntMap as M
	import Data.Maybe
	import Data.Bits
	import Data.Char

	import Debug.Trace

rblaze / forked.hs

Created August 2, 2012 12:53

	{-# LANGUAGE BangPatterns #-}
	module Main where

	import qualified Data.ByteString.Lazy.Char8 as BS
	import qualified Data.IntMap as M
	import Data.Maybe
	import Data.Bits
	import Data.Char
	import System.Environment
	import Text.Printf

rblaze / parse.hs

Created August 2, 2012 14:45

	{-# LANGUAGE BangPatterns #-}
	module Main where

	import qualified Data.ByteString.Lazy.Char8 as BS
	import qualified Data.IntMap as M
	import Data.Maybe
	import Data.Bits
	import Data.Char
	import System.Environment
	import Text.Printf

rblaze / client.hs

Created November 8, 2012 08:33

	module Main where

	import KwHen
	import YBus

	import Network
	import Data.Word
	import Control.Concurrent
	import Control.Concurrent.STM
	import Control.Monad

rblaze / gist:4546946

Created January 16, 2013 12:54

	{-# LANGUAGE BangPatterns #-}
	module Main where

	import Data.Functor
	import Data.Maybe
	import Data.Vector ((//), (!))
	import Control.Monad
	import qualified Data.Vector as V

	import Debug.Trace

rblaze / bf.c

Last active December 11, 2015 07:08

Специальная олимпиада-2: Bellman-Ford algorithm как первый шаг Johnson algorithm Изначальная версия: haskell - 60 минут, C - две минуты. Данные для обработки: http://spark-public.s3.amazonaws.com/algo2/datasets/large.txt

	#include <stdio.h>
	#include <stdlib.h>
	#include <string.h>

	const int infinity = 2147483647;

	struct edge_t {
	int v1;
	int v2;
	int cost;

rblaze / test.hs

Last active December 15, 2015 03:49 — forked from voidlizard/gist:5194823

	{-# Language BangPatterns #-}
	module Main where

	import Data.Binary.Get
	import Data.Word
	import Data.Bits
	import Data.List (foldl')
	import Test.BenchPress
	import Control.Monad
	import qualified Data.ByteString.Lazy as BS

rblaze / test.hs

Created May 28, 2013 11:57

	[1 of 1] Compiling Test ( Test.hs, Test.o )

	Test.hs:17:10:
	Illegal instance declaration for `Heap (CacheHeap h) a'
	(the Coverage Condition fails for one of the functional dependencies;
	Use -XUndecidableInstances to permit this)
	In the instance declaration for `Heap (CacheHeap h) a'

Older Newer