Skip to content

Instantly share code, notes, and snippets.

View agrimm's full-sized avatar

Andrew Grimm agrimm

  • Terem Technologies
  • Sydney, New South Wales
View GitHub Profile
enwiki-20081008-pages-articles.xml
Most common chain ending:
[snip]
Soviet Union 5167
Islamic Republic 5671
April 28 5691
April 7 5753
start = Time.now
largest_known_fixnum = 1
smallest_known_bignum = nil
until (smallest_known_bignum and smallest_known_bignum == largest_known_fixnum + 1)
if smallest_known_bignum.nil?
next_number_to_try = largest_known_fixnum * 1000
else
next_number_to_try = (smallest_known_bignum + largest_known_fixnum) / 2 #Geometric mean would be more efficient, but more risky
end
raise "Can't happen case" if next_number_to_try <= largest_known_fixnum or (smallest_known_bignum and next_number_to_try >= smallest_known_bignum)
[agrimm@computer_name ~]$ mkdir ~/gitproblem ~/gitproblem/public
[agrimm@computer_name ~]$ cd ~/gitproblem/public
[agrimm@computer_name public]$ for mod in a; do
> mkdir $mod
> cd $mod
> git init
> echo "module $mod" > $mod.txt
> git add $mod.txt
> git commit -m "Initial commit, public module $mod"
> cd ..
#Pausing all but x CPU-intensive tasks
PAUSEQUEUENUM=0
ACTIVEQUEUENUM=0
function putinpausequeue {
kill -STOP $1
PAUSEQUEUE="$PAUSEQUEUE $1"
PAUSEQUEUENUM=$(($PAUSEQUEUENUM+1))
echo "Notice. I am pausing $1 . The pause queue is now $PAUSEQUEUE"
[agrimm@computername Hubris]$ ruby /usr/local/bin/rake
(in /home/agrimm/ruby/haskell/Hubris)
which: no dot in (/usr/lib/qt-3.3/bin:/usr/kerberos/bin:/usr/lib/ccache:/usr/local/bin:/usr/bin:/bin:/usr/local/sbin:/usr/sbin:/sbin:/usr/NX/bin:/usr/local/jruby-1.3.0RC1/bin:/home/agrimm/bin:/usr/NX/bin)
sh: c2hs: command not found
[agrimm@computername Hubris]$ ruby /usr/local/bin/rake --verbose --trace
(in /home/agrimm/ruby/haskell/Hubris)
which: no dot in (/usr/lib/qt-3.3/bin:/usr/kerberos/bin:/usr/lib/ccache:/usr/local/bin:/usr/bin:/bin:/usr/local/sbin:/usr/sbin:/sbin:/usr/NX/bin:/usr/local/jruby-1.3.0RC1/bin:/home/agrimm/bin:/home/agrimm/.cabal/bin:/usr/NX/bin)
** Invoke default (first_time)
** Invoke spec (first_time)
** Invoke lib/RubyMap.hs (first_time)
** Invoke lib/RubyMap.chs (first_time, not_needed)
** Execute lib/RubyMap.hs
C->Haskell Compiler, version 0.16.0 Crystal Seed, 24 Jan 2009
build platform is "i386-linux" <1, True, True, 1>
[agrimm@AcerLinux Hubris]$ ruby /usr/local/bin/rake --verbose --trace
(in /home/agrimm/ruby/haskell/Hubris)
find: `/home/agrimm/bin': No such file or directory
rake aborted!
Can't find an appropriate ghc
./lib/hubris.rb:29
/usr/lib/ruby/site_ruby/1.8/rubygems/custom_require.rb:31:in `gem_original_require'
/usr/lib/ruby/site_ruby/1.8/rubygems/custom_require.rb:31:in `require'
/home/agrimm/ruby/haskell/Hubris/Rakefile:5
/usr/lib/ruby/gems/1.8/gems/rake-0.8.7/lib/rake.rb:2383:in `load'
[agrimm@computername ghc-6.11.20090907]$ sh boot
Creating libraries/time/ghc.mk
Creating libraries/time/GNUmakefile
Creating libraries/array/ghc.mk
Creating libraries/array/GNUmakefile
Creating libraries/base/ghc.mk
Creating libraries/base/GNUmakefile
Creating libraries/base3-compat/ghc.mk
Creating libraries/base3-compat/GNUmakefile
Creating libraries/bytestring/ghc.mk
For some reason, this is incomplete. Try http://pastie.org/616080
[agrimm@computer_name ~]$ cd ruby/haskell/Hubris/
[agrimm@computer_name Hubris]$ git status
# On branch master
nothing to commit (working directory clean)
[agrimm@computer_name Hubris]$ ruby /usr/local/bin/rake
(in /home/agrimm/ruby/haskell/Hubris)
mkdir: cannot create directory `/home/agrimm/.hubris_cache': File exists
find: `/home/agrimm/bin': No such file or directory
[agrimm@computer_name ghc-6.11.20090907]$ ls -a
. bootstrapping configure ghc.mk libffi rules
.. ch01.html configure.ac ghc.spec libraries utils
aclocal.m4 ch02.html distrib ghc.spec.in LICENSE VERSION
ANNOUNCE compiler docs HACKING Makefile
autom4te.cache config.guess driver includes mk
bindisttest config.log extra-gcc-opts index.html packages
boot config.status extra-gcc-opts.in inplace README
boot-pkgs config.sub ghc install-sh rts