Method remove_function

src/SchemeFFI.cpp:2402–2422

    }	

  pointer SchemeFFI::remove_function(scheme* _sc, pointer args)
  {
    // Create some module to put our function into it.
    using namespace llvm;

    //Module* M = EXTLLVM::I()->M;		
    //llvm::Function* func = M->getFunction(std::string(string_value(pair_car(args))));
    llvm::Function* func = extemp::EXTLLVM::I()->getFunction(std::string(string_value(pair_car(args))));    
    if(func == 0)
      {
        return _sc->F;
      }		
    if(func->mayBeOverridden()) {
	    func->dropAllReferences();		
	    func->removeFromParent();
	    return _sc->T;
    }else{
	    printf("Cannot remove function with dependencies\n");
	    return _sc->F;
    }
  }		

  pointer SchemeFFI::erase_function(scheme* _sc, pointer args)
  {