Skip to content

Instantly share code, notes, and snippets.

[master!ioke]$ cat frequencies.ik
scriptFrequency = method(text,
count = {} withDefault(0)
text chars each(char,
count[char script] += 1
)
count
)
scriptFrequency("Hi there, how are you?") println
[java]
[java] 1)
[java] Condition Error NoSuchCell in 'DefaultBehavior ? should be possible to create a new LexicalBlock with it'
[java] couldn't find cell '?' on 'ISpec DescribeContext_0x1896D7' (Condition Error NoSuchCell)
[java]
[java] ? call should be nil [/Users/administrator/src/ioke/test/fn_spec.ik:7:6]
[java] /Users/administrator/src/ioke/test/fn_spec.ik:7:6
[java] /Users/administrator/src/ioke/test/fn_spec.ik:7:6
[java]
[java] 2)
graph = method(
Origin mimic do(
G = Origin mimic
G {} = macro(
msg = call arguments first
until(msg nil?,
left = msg arguments first name print
connector = msg name print
right = msg next name println
[master!whatlang]$ rake
(in /Users/administrator/src/whatlang)
/System/Library/Frameworks/Ruby.framework/Versions/1.8/usr/bin/ruby -Ilib:test "/Library/Ruby/Gems/1.8/gems/rake-0.8.3/lib/rake/rake_test_loader.rb" "test/unit/language_test.rb" "test/unit/sample_text_test.rb"
Loaded suite /Library/Ruby/Gems/1.8/gems/rake-0.8.3/lib/rake/rake_test_loader
Started
..
Finished in 0.11417 seconds.
2 tests, 2 assertions, 0 failures, 0 errors
/System/Library/Frameworks/Ruby.framework/Versions/1.8/usr/bin/ruby -Ilib:test "/Library/Ruby/Gems/1.8/gems/rake-0.8.3/lib/rake/rake_test_loader.rb" "test/functional/languages_controller_test.rb" "test/functional/sample_texts_controller_test.rb"
WHAT THE FUCK!?
>> puts x
<?xml version="1.0" encoding="UTF-8"?>
<video>
<id>728800</id>
<created-at>Fri Dec 12 14:05:58 +0100 2008</created-at>
<updated-at>Fri Dec 12 14:05:58 +0100 2008</updated-at>
<title>288</title>
<specs>
@cv
cv / update.rb
Created November 24, 2008 02:46
#!/usr/bin/env ruby
def update_git
puts `git fetch` if Dir['.git'].any?
end
def update_svn
puts `svn up` if Dir['.svn'].any?
end
Member.find(:first, :select => 'sum(performances.overall_positive_rating) as opr', :joins => :performances, :order => 'opr DESC').opr
@cv
cv / .gitignore
Created September 17, 2008 22:25
Spits out a lexicon-like txt file from a wikipedia dump
*.bz2
<?xml version="1.0" encoding="UTF-8"?>
<passport-application>
<uuid>09711c30-40d5-012b-3f7b-001ec212da96</uuid>
<full-name nil="true"></full-name>
<address nil="true"></address>
<...>
</passport-application>
# GET /passport_applications/new
# GET /passport_applications/new.xml
def new
@passport_application = PassportApplication.new
respond_to do |format|
format.html # new.html.erb
format.xml { render :xml => @passport_application }
end
end