adds explicit load_self instruction

lib/ast/call_site_expression.rb

@@ -5,6 +5,8 @@ module Ast
 #    attr_reader  :name, :args , :receiver
     @@counter = 0
     def compile frame , method
+      me = receiver.compile(frame , method )
+      method.add Virtual::LoadSelf.new(me)
       with = args.collect{|a| a.compile(frame , method)}
       frame.compile_send( method , name , with )
     end

lib/crystal.rb

@@ -3,5 +3,5 @@ require 'parslet'
 require "elf/object_writer"
 require 'parser/crystal'
 require 'parser/transform'
-require "ast/all"
 require "virtual/machine"
+require "ast/all"

lib/virtual/instruction.rb

@@ -33,45 +33,59 @@ module Virtual
   end
 
   class FrameGet < Instruction
-    def initialize name
+    def initialize name , nex = nil
+      super(nex)
       @name = name
     end
     attr_reader :name
     def attributes
-      [:name]
+      [:name ] + super
     end
   end
 
   class FrameSend < Instruction
-
-    def initialize name , args = []
+    def initialize name , args = [] , nex = nil
+      super(nex)
       @name = name.to_sym
       @args = args
     end
     attr_reader :name , :args
     def attributes
-      [:name , :args]
+      [:name , :args ] + super
     end
   end
-  class FrameSet < Instruction
 
-    def initialize name , val
+  class FrameSet < Instruction
+    def initialize name , val , nex = nil
+      super(nex)
       @name = name.to_sym
       @value = val
     end
     attr_reader :name , :value
     def attributes
-      [:name , :value]
+      [:name , :value] + super
+    end
+  end
+
+  class LoadSelf < Instruction
+    def initialize val , nex = nil
+      super(nex)
+      @value = val
+    end
+    attr_reader  :value
+    def attributes
+      [:value] + super
     end
   end
 
   class ObjectGet < Instruction
-    def initialize name
+    def initialize name , nex = nil
+      super(nex)
       @name = name
     end
     attr_reader :name
     def attributes
-      [:name]
+      [:name] + super
     end
   end
 end