Skip to content

Instantly share code, notes, and snippets.

View marcmo's full-sized avatar

Oliver Mueller marcmo

View GitHub Profile
class BuildingBlock
attr_accessor :name, :base
attr_reader :config, :dependencies
def initialize(config, name)
@name = name
@dependencies = []
@config = config
ALL_BUILDING_BLOCKS[@name] = self
end
newtype SpecialChar = SC { unSC :: Char } deriving Show
instance Arbitrary SpecialChar where
arbitrary = do
x <- oneof [choose ('\0','\55295'), choose ('\57344','\1114111')]
return (SC x)