~tim/scheme-vm

ref: c5110102ce2df2d78a0c87f293edf20f5a3984e7 scheme-vm/vm/bool_false.rb -rw-r--r-- 199 bytes
c5110102Tim Morgan Add more char functions 3 years ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
require 'singleton'

class VM
  class BoolFalse
    include Singleton

    def raw
      false
    end

    def to_ruby
      raw
    end

    def to_s
      '#f'
    end

    alias eq? ==
  end
end