ujihisa ujihisa

ujihisa / Rakefile

Created July 11, 2009 06:11 — forked from cho45/Rakefile


	require "rubygems"
	require "rake"
	require "pathname"
	require "rexml/document"

	manifest = REXML::Document.new(File.read("AndroidManifest.xml"))
	PACKAGE = manifest.elements["/manifest/@package"].value
	NAME = manifest.elements["/manifest/application/activity/@android:name"].value

ujihisa / knuth_subtractive_random.vim

Created July 6, 2011 04:10 — forked from mrkn/knuth_subtractive_random.vim

	" Knuth Subtractive Random Number Generator

	let s:knuth_random = { 'index': 0, 'state': repeat([0], 56) }

	function! s:knuth_random.seed(seed) dict
	let l:seed = 161803398 - (a:seed < 0 ? -a:seed : a:seed)
	let self.state[55] = l:seed
	let [l:i, l:j, l:k] = [0, 0, 1]
	for l:i in range(1, 54)
	let l:j = (21 * l:i) % 55

ujihisa / z another.hs

Created October 10, 2011 02:29 — forked from ujihisa/split implementations in Haskell.hs

	import qualified Text.Parsec as P

	main = do
	print $ ", hello, world,!" `split` ", "

	t `split` b = case P.parse (split' (P.string b)) "split" t of Right x -> x
	split' b = P.anyChar `P.manyTill` (P.eof P.<\|> (P.try b >> return ())) `P.manyTill` P.eof

ujihisa / lingrvim.rb

Created October 19, 2011 22:43 — forked from d6rkaiz/lingrvim.rb