~ubuntu-branches/ubuntu/quantal/ruby1.9.1/quantal

#include "internal.h"

#define IS_RBEXT(e) (strcmp((e), ".rb") == 0)

#define IS_SOEXT(e) (strcmp((e), ".so") == 0 || strcmp((e), ".o") == 0)

#define IS_DLEXT(e) (strcmp((e), DLEXT) == 0 || strcmp((e), DLEXT2) == 0)

#define IS_DLEXT(e) (strcmp((e), DLEXT) == 0)

    long plen;

    const char *e;

    if(vlen < len) return 0;

    if (!strncmp(name+(vlen-len),feature,len)){

        plen = vlen - len - 1;

    } else {

        for (e = name + vlen; name != e && *e != '.' && *e != '/'; --e);

        if (*e!='.' ||

            e-name < len ||

            strncmp(e-len,feature,len) )

            return 0;

        plen = e - name - len - 1;

    }

        if (n != plen ) continue;

    if (OBJ_FROZEN(get_loaded_features())) {

        rb_raise(rb_eRuntimeError,

                 "$LOADED_FEATURES is frozen; cannot append feature");

    }

        iseq = rb_iseq_new_top(node, rb_str_new2("<top (required)>"), fname, rb_realpath_internal(Qnil, fname, 1), Qfalse);

 *     require(name)    -> true or false

 *

 *  Loads the given +name+, returning +true+ if successful and +false+ if the

 *  feature is already loaded.

 *

 *  If the filename does not resolve to an absolute path, it will be searched

 *  for in the directories listed in <code>$LOAD_PATH</code> (<code>$:</code>).

 *

 *  If the filename has the extension ".rb", it is loaded as a source file; if

 *  the extension is ".so", ".o", or ".dll", or the default shared library

 *  extension on the current platform, Ruby loads the shared library as a

 *  Ruby extension.  Otherwise, Ruby tries adding ".rb", ".so", and so on

 *  to the name until found.  If the file named cannot be found, a LoadError

 *  will be raised.

 *

 *  For Ruby extensions the filename given may use any shared library

 *  extension.  For example, on Linux the socket extension is "socket.so" and

 *  <code>require 'socket.dll'</code> will load the socket extension.

 *

 *  The absolute path of the loaded file is added to

 *  <code>$LOADED_FEATURES</code> (<code>$"</code>).  A file will not be

 *  loaded again if its path already appears in <code>$"</code>.  For example,

 *  <code>require 'a'; require './a'</code> will not load <code>a.rb</code>

 *  again.

 *

 *    require "my-library.rb"

 *    require "db-driver"

/*

 * call-seq:

 *   require_relative(string) -> true or false

 *

 * Ruby tries to load the library named _string_ relative to the requiring

 * file's path.  If the file's path cannot be determined a LoadError is raised.

 * If a file is loaded +true+ is returned and false otherwise.

 */

    VALUE mesg = rb_str_buf_new_cstr("cannot load such file -- ");

                                                    path, 0, path);

RUBY_FUNC_EXPORTED void

                         0, rb_str_new2(name));

    VALUE klass = rb_class_real(rb_vm_cbase());

#define rb_intern(str) rb_intern2((str), strlen(str))