move adapter stuff around

lib/parfait/list.rb

@@ -50,7 +50,7 @@ module Parfait
       ret
     end
     alias :[] :get
-    
+
     def grow_to( len )
       raise "Only positive lenths, #{len}" if len < 0
       old_length = get_length
@@ -253,15 +253,4 @@ module Parfait
     end
   end
 
-  # new list from ruby array to be precise
-  def self.new_list array
-    list = Parfait::List.new
-    list.set_length array.length
-    index = 0
-    while index < array.length do
-      list.set(index , array[index])
-      index = index + 1
-    end
-    list
-  end
 end

lib/parfait/word.rb

@@ -191,14 +191,4 @@ module Parfait
     end
   end
 
-  # Word from string
-  def self.new_word( string )
-    string = string.to_s if string.is_a? Symbol
-    word = Word.new( string.length )
-    string.codepoints.each_with_index do |code , index |
-      word.set_char(index , code)
-    end
-    word
-  end
-
 end

lib/risc/parfait_adapter.rb

@@ -23,6 +23,29 @@ module Parfait
       value
     end
   end
+
+  # new list from ruby array to be precise
+  def self.new_list array
+    list = Parfait::List.new
+    list.set_length array.length
+    index = 0
+    while index < array.length do
+      list.set(index , array[index])
+      index = index + 1
+    end
+    list
+  end
+
+  # Word from string
+  def self.new_word( string )
+    string = string.to_s if string.is_a? Symbol
+    word = Word.new( string.length )
+    string.codepoints.each_with_index do |code , index |
+      word.set_char(index , code)
+    end
+    word
+  end
+
 end
 
 class Symbol

test/risc/test_parfait_adapter.rb

@@ -1,7 +1,7 @@
 require_relative "helper"
 
 module Parfait
-  class TestCompat < MiniTest::Test
+  class TestAdapter < MiniTest::Test
 
     def setup
       Risc.machine.boot