Start line:  
End line:  

Snippet Preview

Snippet HTML Code

Stack Overflow Questions
BEGIN LICENSE BLOCK ***** Version: CPL 1.0/GPL 2.0/LGPL 2.1 The contents of this file are subject to the Common Public License Version 1.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.eclipse.org/legal/cpl-v10.html Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. Copyright (C) 2007 Charles O Nutter <headius@headius.com> Alternatively, the contents of this file may be used under the terms of either of the GNU General Public License Version 2 or later (the "GPL"), or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), in which case the provisions of the GPL or the LGPL are applicable instead of those above. If you wish to allow use of your version of this file only under the terms of either the GPL or the LGPL, and not to allow others to use your version of this file under the terms of the CPL, indicate your decision by deleting the provisions above and replace them with the notice and other provisions required by the GPL or the LGPL. If you do not delete the provisions above, a recipient may use your version of this file under the terms of any one of the CPL, the GPL or the LGPL. END LICENSE BLOCK ***
 
 package org.jruby.runtime;
 
 import org.jruby.Ruby;
A Block implemented using a Java-based BlockCallback implementation rather than with an ICallable. For lightweight block logic within Java code.
 
 public class CompiledBlock extends ContextAwareBlockBody {
     protected final CompiledBlockCallback callback;
     protected final boolean hasMultipleArgsHead;
     
     public static Block newCompiledClosure(ThreadContext contextIRubyObject selfArity arity,
             StaticScope scopeCompiledBlockCallback callbackboolean hasMultipleArgsHeadint argumentType) {
         Binding binding = context.currentBinding(self.);
         BlockBody body = new CompiledBlock(arityscopecallbackhasMultipleArgsHeadargumentType);
 
         return new Block(bodybinding);
     }
     
     public static Block newCompiledClosure(ThreadContext contextIRubyObject selfBlockBody body) {
         Binding binding = context.currentBinding(self.);
         return new Block(bodybinding);
     }
     
     public static BlockBody newCompiledBlock(Arity arity,
             StaticScope scopeCompiledBlockCallback callbackboolean hasMultipleArgsHeadint argumentType) {
         return new CompiledBlock(arityscopecallbackhasMultipleArgsHeadargumentType);
     }
 
     protected CompiledBlock(Arity arityStaticScope scopeCompiledBlockCallback callbackboolean hasMultipleArgsHeadint argumentType) {
         super(scopearityargumentType);
         
         this. = callback;
         this. = hasMultipleArgsHead;
     }
 
     @Override
     public IRubyObject yieldSpecific(ThreadContext contextBinding bindingBlock.Type type) {
         return yield(contextnullbindingtype);
     }
 
     @Override
     public IRubyObject yieldSpecific(ThreadContext contextIRubyObject arg0Binding bindingBlock.Type type) {
         return yield(contextarg0bindingtype);
     }
 
     @Override
     public IRubyObject yieldSpecific(ThreadContext contextIRubyObject arg0IRubyObject arg1Binding bindingBlock.Type type) {
         return yield(contextcontext.runtime.newArrayNoCopyLight(arg0arg1), nullnulltruebindingtype);
     }
 
     @Override
     public IRubyObject yieldSpecific(ThreadContext contextIRubyObject arg0IRubyObject arg1IRubyObject arg2Binding bindingBlock.Type type) {
         return yield(contextcontext.runtime.newArrayNoCopyLight(arg0arg1arg2), nullnulltruebindingtype);
     }
 
     @Override
     public IRubyObject yield(ThreadContext contextIRubyObject valueBinding bindingBlock.Type type) {
         return yield(contextvaluebindingtype.);
     }
     
     public IRubyObject yield(ThreadContext contextIRubyObject argsIRubyObject selfRubyModule klassboolean aValueBinding bindingBlock.Type type) {
         return yield(contextargsselfklassaValuebindingtype.);
    }
    // FIXME: These two duplicate overrides should go away
    @Override
    public IRubyObject yield(ThreadContext contextIRubyObject valueBinding bindingBlock.Type typeBlock block) {
        IRubyObject self = prepareSelf(binding);
        IRubyObject realArg = setupBlockArg(context.runtimevalueself);
        Visibility oldVis = binding.getFrame().getVisibility();
        Frame lastFrame = pre(contextnullbinding);
        try {
            return .call(contextselfrealArgblock);
        } catch (JumpException.NextJump nj) {
            // A 'next' is like a local return from the block, ending this call or yield.
            return handleNextJump(contextnjtype);
        } finally {
            post(contextbindingoldVislastFrame);
        }
    }
    @Override
    public IRubyObject yield(ThreadContext contextIRubyObject argsIRubyObject selfRubyModule klassboolean aValueBinding bindingBlock.Type typeBlock block) {
        if (klass == null) {
            self = prepareSelf(binding);
        }
        IRubyObject realArg = aValue ?
                setupBlockArgs(contextargsself) : setupBlockArg(context.runtimeargsself);
        Visibility oldVis = binding.getFrame().getVisibility();
        Frame lastFrame = pre(contextklassbinding);
        try {
            return .call(contextselfrealArgblock);
        } catch (JumpException.NextJump nj) {
            // A 'next' is like a local return from the block, ending this call or yield.
            return handleNextJump(contextnjtype);
        } finally {
            post(contextbindingoldVislastFrame);
        }
    }
    
    private IRubyObject prepareSelf(Binding binding) {
        IRubyObject self = binding.getSelf();
        binding.getFrame().setSelf(self);
        
        return self;
    }
    private IRubyObject handleNextJump(ThreadContext contextJumpException.NextJump njBlock.Type type) {
        return nj.getValue() == null ? context.runtime.getNil() : (IRubyObject)nj.getValue();
    }
    protected IRubyObject setupBlockArgs(ThreadContext contextIRubyObject valueIRubyObject self) {
        switch () {
        case :
            return null;
        case :
        case :
            return value;
        default:
            return defaultArgsLogic(context.runtimevalue);
        }
    }
    
    private IRubyObject defaultArgsLogic(Ruby rubyIRubyObject value) {
        int length = ArgsUtil.arrayLength(value);
        switch (length) {
        case 0:
            return ruby.getNil();
        case 1:
            return ((RubyArray)value).eltInternal(0);
        default:
            blockArgWarning(rubylength);
        }
        return value;
    }
    
    private void blockArgWarning(Ruby rubyint length) {
        ruby.getWarnings().warn(."multiple values for a block parameter (" +
                    length + " for 1)");
    }
    protected IRubyObject setupBlockArg(Ruby rubyIRubyObject valueIRubyObject self) {
        switch () {
        case :
            return null;
        case :
        case :
            return ArgsUtil.convertToRubyArray(rubyvalue);
        default:
            return defaultArgLogic(rubyvalue);
        }
    }
    
    private IRubyObject defaultArgLogic(Ruby rubyIRubyObject value) {
        if (value == null) {
            return warnMultiReturnNil(ruby);
        }
        return value;
    }
    public String getFile() {
        return .getFile();
    }
    public int getLine() {
        return .getLine();
    }
    private IRubyObject warnMultiReturnNil(Ruby ruby) {
        ruby.getWarnings().warn(."multiple values for a block parameter (0 for 1)");
        return ruby.getNil();
    }
New to GrepCode? Check out our FAQ X