File: message_concatenation.rb

package info (click to toggle)
ruby-riot 0.12.7-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, stretch
  • size: 496 kB
  • ctags: 319
  • sloc: ruby: 2,572; makefile: 2
file content (82 lines) | stat: -rw-r--r-- 2,171 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
require 'benchmark'

class BlankSlate
  instance_methods.each { |meth| undef_method(meth) unless meth.to_s =~ /^(__|object_id)/ }
end

class NormalMessage < BlankSlate
  def initialize(*phrases)
    @message = ""; _phrase(*phrases)
  end
  
  def to_s; @message; end

  def method_missing(meth, *phrases, &blk) push(meth.to_s.gsub('_', ' ')); _phrase(*phrases); end

  def comma(str, *phrases) raise Exception, "Whoops - comma"; end
  def but(*phrases); comma("but", *phrases); end
  def not(*phrases); comma("not", *phrases); end
  def push(str) raise Exception, "Whoops - push"; end
private
  def _concat(str) (@message << str).strip!; self; end
  def _phrase(*phrases) phrases.each { |phrase| push(phrase.inspect) }; self; end
end # Message

# +

class PlusMessage < NormalMessage
  def comma(str, *phrases) _concat(", " + str); _phrase(*phrases); end
  def push(str) _concat(" " + str); end
end # Message

# <<

class AppendMessage < NormalMessage
  def comma(str, *phrases) _concat(", " << str); _phrase(*phrases); end
  def push(str) _concat(" " << str); end
end # Message

# Experimental

class ExperimentalMessage < BlankSlate
  def initialize(*phrases)
    @chunks = []; _inspect(phrases)
  end
  
  def to_s; @chunks.join; end

  def method_missing(meth, *phrases, &blk) push(meth.to_s.gsub('_', ' ')); _inspect(phrases); end

  def comma(str, *phrases) _concat([", ", str]); _inspect(phrases); end
  def but(*phrases); comma("but", *phrases); end
  def not(*phrases); comma("not", *phrases); end
  def push(str) _concat([" ", str]); end
private
  def _concat(chunks) @chunks.concat(chunks); self; end
  def _inspect(phrases) phrases.each { |phrase| push(phrase.inspect) }; self; end
end # Message

#
# Benchmarking

Benchmark.bmbm do |x|
  def message_test(klass)
    STDOUT.puts(klass.new.comma("yes").push("no").foo.bar("baz").to_s)
    10_000.times do
      klass.new.comma("yes").push("no").foo.bar("baz").to_s
    end
  end

  x.report("+ based message") do
    message_test(PlusMessage)
  end

  x.report("<< based message") do
    message_test(AppendMessage)
  end

  x.report("experimental message") do
    message_test(ExperimentalMessage)
  end
end