Exemplos de addBindings em C++ (Cpp)

Exemplo n.º 1

Arquivo: interpreter.c Projeto: Machyne/RacketInterpreter

// Evaluates a let expression and makes a new frame that will point to the frame that is given to it
// as a parameter
Value evalLet(Value tree, Frame *env){
    if(tree.type != consType){
        return evaluationError("improper use of \'let\'");
    }
    if(!tree.consValue){
        return evaluationError("no arguments given to \'let\'");
    }
    
    // Get the bindings and the body
    Value bindings = getNth(tree.consValue,0); 
    Value body = getNth(tree.consValue,1);
    if( (body.type == openType) || (bindings.type == openType) ){
        return evaluationError("not enough arguments given to a \'let\'");
    }

    // Make a new frame from the bindings list
    Frame *newEnv = makeFrame(env);
    insertVectorItem(envGarbage, envGarbage->size, (void *)newEnv);
    
    if(!addBindings(newEnv, bindings)){
        return evaluationError("poorly formed \'let\'");
    }

    return eval(body, newEnv);
}

Exemplo n.º 2

Arquivo: bind_ellipse.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindEllipse::KstBindEllipse(KJS::ExecState *exec, KJS::Object *globalObject, const char *name)
: KstBindViewObject(exec, globalObject, name ? name : "Ellipse") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    KstBindViewObject::addFactory("Ellipse", KstBindEllipse::bindFactory);
  }
}

Exemplo n.º 3

Arquivo: bind_scalar.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindScalar::KstBindScalar(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBindObject(exec, globalObject, "Scalar") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (!globalObject) {
    _d = new KstScalar;
  }
}

Exemplo n.º 4

Arquivo: bind_powerspectrum.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindPowerSpectrum::KstBindPowerSpectrum(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBindDataObject(exec, globalObject, "PowerSpectrum") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    KstBindDataObject::addFactory("PowerSpectrum", KstBindPowerSpectrum::bindFactory);
  }
}

Exemplo n.º 5

Arquivo: bind_point.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindPoint::KstBindPoint(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBinding("Point"), _x(0), _y(0) {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    globalObject->put(exec, "Point", o);
  }
}

Exemplo n.º 6

KstBindLegend::KstBindLegend(KJS::ExecState *exec, KJS::Object *globalObject, const char *name)
: KstBindBorderedViewObject(exec, globalObject, name ? name : "Legend") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    KstBindBorderedViewObject::addFactory("Legend", KstBindLegend::bindFactory);
  }
}

Exemplo n.º 7

Arquivo: bind_cubicbezier.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindCubicBezier::KstBindCubicBezier(KJS::ExecState *exec, KJS::Object *globalObject, const char *name)
: KstBindViewObject(exec, globalObject, name ? name : "CubicBezier") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    KstBindViewObject::addFactory("Bezier", KstBindCubicBezier::bindFactory);
  }
}

Exemplo n.º 8

KstBindObject::KstBindObject(KJS::ExecState *exec, KJS::Object *globalObject, const char *name)
: KstBinding(name ? name : "Object") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    globalObject->put(exec, name ? name : "Object", o);
  }
}

Exemplo n.º 9

KstBindDebug::KstBindDebug(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBinding("Debug", false) {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    globalObject->put(exec, "Debug", o);
  }
}

Exemplo n.º 10

Arquivo: bind_size.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindSize::KstBindSize(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBinding("Size") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    globalObject->put(exec, "Size", o);
  }
}

Exemplo n.º 11

KstBindCurve::KstBindCurve(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBindDataObject(exec, globalObject, "Curve") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    KstBindDataObject::addFactory("Curve", KstBindCurve::bindFactory);
  }
}

Exemplo n.º 12

KstBindPlot::KstBindPlot(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBindBorderedViewObject(exec, globalObject, "Plot") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    //globalObject->put(exec, "Plot", o);
    KstBindBorderedViewObject::addFactory("Plot", KstBindPlot::bindFactory);
  }
}

Exemplo n.º 13

KstBindWindow::KstBindWindow(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBinding("Window") {
  KJS::Object o(this);
  addBindings(exec, o);
  if (globalObject) {
    globalObject->put(exec, "Window", o);
  } else {
    _d = new KstViewWindow;
  }
}

Exemplo n.º 14

Arquivo: TypeDescriber.cpp Projeto: PushButtonLabs/PBNetworking

	static void addBindings(MultinameHashtable* bindings, TraitsBindingsp tb, uint32_t flags)
	{
		if (!tb) return;
		if ((flags & TypeDescriber::HIDE_OBJECT) && !tb->base) return;
		addBindings(bindings, tb->base, flags);
		for (int32_t index = 0; (index = tb->next(index)) != 0; )
		{
			bindings->add(tb->keyAt(index), tb->nsAt(index), tb->valueAt(index));
		}
	}

Exemplo n.º 15

Arquivo: qdir_imp.cpp Projeto: Kst-plot/kst-subversion-archive

 KJS::Object QDirLoader::createBinding(KJSEmbedPart *jspart, KJS::ExecState *exec, const KJS::List &args) const
 {
     JSOpaqueProxy * prx;
     if ( args.size() == 0 ) {
         prx = new JSOpaqueProxy( new QDir( QDir::current() ), "QDir" );
     } else {
         QString arg0 = ( args.size() >= 1 ) ? args[ 0 ].toString( exec ).qstring() : QString::null;
         prx = new JSOpaqueProxy( new QDir( arg0 ), "QDir" );
     }
     prx->setOwner( JSProxy::JavaScript );
     KJS::Object proxyObj( prx );
     addBindings( jspart, exec, proxyObj );
     return proxyObj;
 }

Exemplo n.º 16

KstBindCurve::KstBindCurve(KJS::ExecState *exec, KstVCurvePtr d)
: KstBindDataObject(exec, d.data(), "Curve") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 17

KstBindPlotLabel::KstBindPlotLabel(KJS::ExecState *exec, Kst2DPlotPtr d)
: QObject(), KstBinding("PlotLabel", false), _d(d.data()) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 18

KstBindObject::KstBindObject(KJS::ExecState *exec, KstObjectPtr d, const char *name)
: KstBinding(name ? name : "Object"), _d(d) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 19

Arquivo: bind_timeinterpretation.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindTimeInterpretation::KstBindTimeInterpretation(KJS::ExecState *exec, KstBindAxis *d)
: KstBinding("TimeInterpretation", false), _d(d) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 20

Arquivo: bind_borderedviewobject.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindBorderedViewObject::KstBindBorderedViewObject(KJS::ExecState *exec, KstBorderedViewObjectPtr d, const char *name)
: KstBindViewObject(exec, d.data(), name ? name : "BorderedViewObject") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 21

KstBindWindow::KstBindWindow(KJS::ExecState *exec, KstViewWindow *d)
: KstBinding("Window"), _d(d) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 22

Arquivo: bind_cubicbezier.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindCubicBezier::KstBindCubicBezier(KJS::ExecState *exec, KstViewBezierPtr d, const char *name)
: KstBindViewObject(exec, d.data(), name ? name : "CubicBezier") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 23

Arquivo: bind_point.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindPoint::KstBindPoint(KJS::ExecState *exec, double x, double y)
: KstBinding("Point"), _x(x), _y(y) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 24

Arquivo: bind_datasource.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindDataSource::KstBindDataSource(KJS::ExecState *exec, KstDataSourcePtr s)
: KstBindObject(exec, s.data(), "DataSource") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 25

Arquivo: bind_ellipse.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindEllipse::KstBindEllipse(KJS::ExecState *exec, KstViewEllipsePtr d, const char *name)
: KstBindViewObject(exec, d.data(), name ? name : "Ellipse") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 26

Arquivo: bind_datasource.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindDataSource::KstBindDataSource(KJS::ExecState *exec, KJS::Object *globalObject)
: KstBindObject(exec, globalObject, "DataSource") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 27

Arquivo: bind_size.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindSize::KstBindSize(KJS::ExecState *exec, const QSize& sz)
: KstBinding("Size"), _sz(sz) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 28

Arquivo: bind_size.cpp Projeto: Kst-plot/kst-subversion-archive

KstBindSize::KstBindSize(KJS::ExecState *exec, int w, int h)
: KstBinding("Size"), _sz(w, h) {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 29

KstBindViewObject::KstBindViewObject(KJS::ExecState *exec, KJS::Object *globalObject, const char *name)
: KstBindObject(exec, globalObject, name ? name : "ViewObject") {
  KJS::Object o(this);
  addBindings(exec, o);
}

Exemplo n.º 30

KstBindLegend::KstBindLegend(KJS::ExecState *exec, KstViewLegendPtr d, const char *name)
: KstBindBorderedViewObject(exec, d.data(), name ? name : "Legend") {
  KJS::Object o(this);
  addBindings(exec, o);
}