pbevin

diff --git a/kernel/common/compiled_method.rb b/kernel/common/compiled_method.rb
index df80cc9..338c18a 100644
--- a/kernel/common/compiled_method.rb
+++ b/kernel/common/compiled_method.rb
@@ -198,6 +198,8 @@ module Rubinius
 
     class Script
       attr_accessor :path
+      def root_script=(value); @root_script = value; end
+      def root_script?; @root_script; end

pbevin

diff --git a/kernel/compiler/bytecode.rb b/kernel/compiler/bytecode.rb
index 13e40fb..4cd22ea 100644
--- a/kernel/compiler/bytecode.rb
+++ b/kernel/compiler/bytecode.rb
@@ -153,13 +153,19 @@ class Compiler
           splat = @body.pop
         end
 
-        @body.each do |x|
-          x.bytecode(g)

pbevin

diff --git a/kernel/common/float.rb b/kernel/common/float.rb
index bd31205..3b8d40c 100644
--- a/kernel/common/float.rb
+++ b/kernel/common/float.rb
@@ -161,6 +161,10 @@ class Float < Numeric
   end
   private :to_s_formatted
 
+  def to_packed(size)
+    Ruby.primitive :float_to_packed

pbevin

class L
end

class Module
  def has_logging()
    class_eval {
      log = L.new
      define_method(:log) do
        log
      end

pbevin

<script type="text/javascript">
var gaJsHost = (("https:" == document.location.protocol) ? "https://ssl." : "http://www.");
document.write(unescape("%3Cscript src='"+gaJsHost+"google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E"));
</script>
<script type="text/javascript">
try {
var pageTracker = _gat._getTracker("UA-4171338-2");
pageTracker._setDomainName(".hover.com");
pageTracker._setAllowLinker(true);
pageTracker._setAllowHash(false);

pbevin

<script type="text/javascript">
var gaJsHost = (("https:" == document.location.protocol) ? "https://ssl." : "http://www.");
document.write(unescape("%3Cscript src='"+gaJsHost+"google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E"));
</script>
<script type="text/javascript">
try {
var pageTracker = _gat._getTracker("UA-4171338-2");
pageTracker._setDomainName("none");
pageTracker._setAllowLinker(true);
pageTracker._setAllowHash(false);

pbevin

e = g(1,0,1,1,2,3) where
  g(q,r,t,k,n,l) =
    if 2*q+r-t<n*t
    then n : g(10*q,10*(r-n*t),t,k,div(10*(q+r))t-10*n,l)
    else g(q,(q+r)*k,t*k,k+1,div(q+r*k)(t*k),l+2)

pbevin

import Data.Char
e = map (intToDigit . fromInteger) $ stream next safe prod cons init lfts where
  init = unit
  lfts = [(1, k, 0, k) | k<-[1..]]
  next z = floor (extr z 1)
  safe z n = (n == floor (extr z 2))
  prod z n = comp (10, -10*n, 0, 1) z
  cons z z' = comp z z'

type LFT = (Integer, Integer, Integer, Integer)

pbevin

q,r,t,k,n = 1,0,1,1,2,3

loop do
  if 2*q+r-t < n*t
    print n
    q,r,t,k,n = 10*q,10*(r-n*t),t,k,(10*(q+r))/t-10*n
  else
    r,t,k,n = (q+r)*k, t*k, k+1, (q+r*k)/(t*k)
  end
end

pbevin

Keybase proof

I hereby claim:

• I am pbevin on github.
• I am pbevin (https://keybase.io/pbevin) on keybase.
• I have a public key ASBJUxKDucu4w1A5W35COnGciCDILCZJcTkLx9n3yd4Dfgo

To claim this, I am signing this object: