adds mom while

much like the if, difference will show later in the jump arrangement

lib/mom/instruction.rb

@@ -24,6 +24,7 @@ end
 
 require_relative "simple_call"
 require_relative "if_statement"
+require_relative "while_statement"
 require_relative "truth_check"
 require_relative "jump"
 require_relative "slot_load"

lib/mom/while_statement.rb

@@ -0,0 +1,14 @@
+
+module Mom
+  class WhileStatement < Instruction
+    attr_reader :condition , :statements
+
+    attr_accessor :hoisted
+
+    def initialize( cond , statements)
+      @condition = cond
+      @statements = statements
+    end
+  end
+
+end

lib/vool/statements/while_statement.rb

@@ -1,5 +1,8 @@
+require_relative "hoister"
+
 module Vool
   class WhileStatement < Statement
+    include Hoister
     attr_reader :condition , :statements
 
     def initialize( condition , statements )
@@ -8,6 +11,15 @@ module Vool
       simplify_condition
     end
 
+    def to_mom( method )
+      statements =   @statements.to_mom( method )
+      condition , hoisted  = hoist_condition( method )
+      cond = Mom::TruthCheck.new(condition.to_mom(method))
+      check = Mom::WhileStatement.new(  cond , statements  )
+      check.hoisted = hoisted.to_mom(method) if hoisted
+      check
+    end
+
     def simplify_condition
       return unless @condition.is_a?(ScopeStatement)
       @condition = @condition.first if @condition.single?