Ignore:
Timestamp:
Aug 8, 2013, 3:59:21 PM (11 years ago)
Author:
ldelgass
Message:

Fix spelling of parallelepiped, silently fix left-handed ordering of vectors

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/packages/vizservers/vtkvis/RendererCmd.cpp

    r3859 r3861  
    85598559
    85608560static int
    8561 ParallelpipedAddOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8562                    Tcl_Obj *const *objv)
     8561ParallelepipedAddOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8562                    Tcl_Obj *const *objv)
    85638563{
    85648564    double vec1[3], vec2[3], vec3[3];
     
    85758575    }
    85768576    const char *name = Tcl_GetString(objv[11]);
    8577     if (!g_renderer->addParallelpiped(name, vec1, vec2, vec3)) {
    8578         Tcl_AppendResult(interp, "Failed to create parallelpiped", (char*)NULL);
    8579         return TCL_ERROR;
    8580     }
    8581     return TCL_OK;
    8582 }
    8583 
    8584 static int
    8585 ParallelpipedDeleteOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8586                       Tcl_Obj *const *objv)
     8577    if (!g_renderer->addParallelepiped(name, vec1, vec2, vec3)) {
     8578        Tcl_AppendResult(interp, "Failed to create parallelepiped", (char*)NULL);
     8579        return TCL_ERROR;
     8580    }
     8581    return TCL_OK;
     8582}
     8583
     8584static int
     8585ParallelepipedDeleteOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8586                       Tcl_Obj *const *objv)
    85878587{
    85888588    if (objc == 3) {
    85898589        const char *name = Tcl_GetString(objv[2]);
    8590         g_renderer->deleteGraphicsObject<Parallelpiped>(name);
    8591     } else {
    8592         g_renderer->deleteGraphicsObject<Parallelpiped>("all");
    8593     }
    8594     return TCL_OK;
    8595 }
    8596 
    8597 static int
    8598 ParallelpipedColorOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8599                      Tcl_Obj *const *objv)
     8590        g_renderer->deleteGraphicsObject<Parallelepiped>(name);
     8591    } else {
     8592        g_renderer->deleteGraphicsObject<Parallelepiped>("all");
     8593    }
     8594    return TCL_OK;
     8595}
     8596
     8597static int
     8598ParallelepipedColorOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8599                      Tcl_Obj *const *objv)
    86008600{
    86018601    float color[3];
     
    86078607    if (objc == 6) {
    86088608        const char *name = Tcl_GetString(objv[5]);
    8609         g_renderer->setGraphicsObjectColor<Parallelpiped>(name, color);
    8610     } else {
    8611         g_renderer->setGraphicsObjectColor<Parallelpiped>("all", color);
    8612     }
    8613     return TCL_OK;
    8614 }
    8615 
    8616 static int
    8617 ParallelpipedCullingOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8618                        Tcl_Obj *const *objv)
     8609        g_renderer->setGraphicsObjectColor<Parallelepiped>(name, color);
     8610    } else {
     8611        g_renderer->setGraphicsObjectColor<Parallelepiped>("all", color);
     8612    }
     8613    return TCL_OK;
     8614}
     8615
     8616static int
     8617ParallelepipedCullingOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8618                        Tcl_Obj *const *objv)
    86198619{
    86208620    bool state;
     
    86248624    if (objc == 4) {
    86258625        const char *name = Tcl_GetString(objv[3]);
    8626         g_renderer->setGraphicsObjectCulling<Parallelpiped>(name, state);
    8627     } else {
    8628         g_renderer->setGraphicsObjectCulling<Parallelpiped>("all", state);
    8629     }
    8630     return TCL_OK;
    8631 }
    8632 
    8633 static int
    8634 ParallelpipedEdgeVisibilityOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8635                               Tcl_Obj *const *objv)
     8626        g_renderer->setGraphicsObjectCulling<Parallelepiped>(name, state);
     8627    } else {
     8628        g_renderer->setGraphicsObjectCulling<Parallelepiped>("all", state);
     8629    }
     8630    return TCL_OK;
     8631}
     8632
     8633static int
     8634ParallelepipedEdgeVisibilityOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8635                               Tcl_Obj *const *objv)
    86368636{
    86378637    bool state;
     
    86418641    if (objc == 4) {
    86428642        const char *name = Tcl_GetString(objv[3]);
    8643         g_renderer->setGraphicsObjectEdgeVisibility<Parallelpiped>(name, state);
    8644     } else {
    8645         g_renderer->setGraphicsObjectEdgeVisibility<Parallelpiped>("all", state);
    8646     }
    8647     return TCL_OK;
    8648 }
    8649 
    8650 static int
    8651 ParallelpipedFlipNormalsOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8652                            Tcl_Obj *const *objv)
     8643        g_renderer->setGraphicsObjectEdgeVisibility<Parallelepiped>(name, state);
     8644    } else {
     8645        g_renderer->setGraphicsObjectEdgeVisibility<Parallelepiped>("all", state);
     8646    }
     8647    return TCL_OK;
     8648}
     8649
     8650static int
     8651ParallelepipedFlipNormalsOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8652                            Tcl_Obj *const *objv)
    86538653{
    86548654    bool state;
     
    86588658    if (objc == 4) {
    86598659        const char *name = Tcl_GetString(objv[3]);
    8660         g_renderer->setGraphicsObjectFlipNormals<Parallelpiped>(name, state);
    8661     } else {
    8662         g_renderer->setGraphicsObjectFlipNormals<Parallelpiped>("all", state);
    8663     }
    8664     return TCL_OK;
    8665 }
    8666 
    8667 static int
    8668 ParallelpipedLightingOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8669                         Tcl_Obj *const *objv)
     8660        g_renderer->setGraphicsObjectFlipNormals<Parallelepiped>(name, state);
     8661    } else {
     8662        g_renderer->setGraphicsObjectFlipNormals<Parallelepiped>("all", state);
     8663    }
     8664    return TCL_OK;
     8665}
     8666
     8667static int
     8668ParallelepipedLightingOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8669                         Tcl_Obj *const *objv)
    86708670{
    86718671    bool state;
     
    86758675    if (objc == 4) {
    86768676        const char *name = Tcl_GetString(objv[3]);
    8677         g_renderer->setGraphicsObjectLighting<Parallelpiped>(name, state);
    8678     } else {
    8679         g_renderer->setGraphicsObjectLighting<Parallelpiped>("all", state);
    8680     }
    8681     return TCL_OK;
    8682 }
    8683 
    8684 static int
    8685 ParallelpipedLineColorOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8686                          Tcl_Obj *const *objv)
     8677        g_renderer->setGraphicsObjectLighting<Parallelepiped>(name, state);
     8678    } else {
     8679        g_renderer->setGraphicsObjectLighting<Parallelepiped>("all", state);
     8680    }
     8681    return TCL_OK;
     8682}
     8683
     8684static int
     8685ParallelepipedLineColorOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8686                          Tcl_Obj *const *objv)
    86878687{
    86888688    float color[3];
     
    86948694    if (objc == 6) {
    86958695        const char *name = Tcl_GetString(objv[5]);
    8696         g_renderer->setGraphicsObjectEdgeColor<Parallelpiped>(name, color);
    8697     } else {
    8698         g_renderer->setGraphicsObjectEdgeColor<Parallelpiped>("all", color);
    8699     }
    8700     return TCL_OK;
    8701 }
    8702 
    8703 static int
    8704 ParallelpipedLineWidthOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8705                          Tcl_Obj *const *objv)
     8696        g_renderer->setGraphicsObjectEdgeColor<Parallelepiped>(name, color);
     8697    } else {
     8698        g_renderer->setGraphicsObjectEdgeColor<Parallelepiped>("all", color);
     8699    }
     8700    return TCL_OK;
     8701}
     8702
     8703static int
     8704ParallelepipedLineWidthOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8705                          Tcl_Obj *const *objv)
    87068706{
    87078707    float width;
     
    87118711    if (objc == 4) {
    87128712        const char *name = Tcl_GetString(objv[3]);
    8713         g_renderer->setGraphicsObjectEdgeWidth<Parallelpiped>(name, width);
    8714     } else {
    8715         g_renderer->setGraphicsObjectEdgeWidth<Parallelpiped>("all", width);
    8716     }
    8717     return TCL_OK;
    8718 }
    8719 
    8720 static int
    8721 ParallelpipedMaterialOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8722                         Tcl_Obj *const *objv)
     8713        g_renderer->setGraphicsObjectEdgeWidth<Parallelepiped>(name, width);
     8714    } else {
     8715        g_renderer->setGraphicsObjectEdgeWidth<Parallelepiped>("all", width);
     8716    }
     8717    return TCL_OK;
     8718}
     8719
     8720static int
     8721ParallelepipedMaterialOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8722                         Tcl_Obj *const *objv)
    87238723{
    87248724    double ambient, diffuse, specCoeff, specPower;
     
    87328732    if (objc == 7) {
    87338733        const char *name = Tcl_GetString(objv[6]);
    8734         g_renderer->setGraphicsObjectAmbient<Parallelpiped>(name, ambient);
    8735         g_renderer->setGraphicsObjectDiffuse<Parallelpiped>(name, diffuse);
    8736         g_renderer->setGraphicsObjectSpecular<Parallelpiped>(name, specCoeff, specPower);
    8737     } else {
    8738         g_renderer->setGraphicsObjectAmbient<Parallelpiped>("all", ambient);
    8739         g_renderer->setGraphicsObjectDiffuse<Parallelpiped>("all", diffuse);
    8740         g_renderer->setGraphicsObjectSpecular<Parallelpiped>("all", specCoeff, specPower);
    8741     }
    8742     return TCL_OK;
    8743 }
    8744 
    8745 static int
    8746 ParallelpipedOpacityOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8747                        Tcl_Obj *const *objv)
     8734        g_renderer->setGraphicsObjectAmbient<Parallelepiped>(name, ambient);
     8735        g_renderer->setGraphicsObjectDiffuse<Parallelepiped>(name, diffuse);
     8736        g_renderer->setGraphicsObjectSpecular<Parallelepiped>(name, specCoeff, specPower);
     8737    } else {
     8738        g_renderer->setGraphicsObjectAmbient<Parallelepiped>("all", ambient);
     8739        g_renderer->setGraphicsObjectDiffuse<Parallelepiped>("all", diffuse);
     8740        g_renderer->setGraphicsObjectSpecular<Parallelepiped>("all", specCoeff, specPower);
     8741    }
     8742    return TCL_OK;
     8743}
     8744
     8745static int
     8746ParallelepipedOpacityOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8747                        Tcl_Obj *const *objv)
    87488748{
    87498749    double opacity;
     
    87538753    if (objc == 4) {
    87548754        const char *name = Tcl_GetString(objv[3]);
    8755         g_renderer->setGraphicsObjectOpacity<Parallelpiped>(name, opacity);
    8756     } else {
    8757         g_renderer->setGraphicsObjectOpacity<Parallelpiped>("all", opacity);
    8758     }
    8759     return TCL_OK;
    8760 }
    8761 
    8762 static int
    8763 ParallelpipedOrientOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8764                       Tcl_Obj *const *objv)
     8755        g_renderer->setGraphicsObjectOpacity<Parallelepiped>(name, opacity);
     8756    } else {
     8757        g_renderer->setGraphicsObjectOpacity<Parallelepiped>("all", opacity);
     8758    }
     8759    return TCL_OK;
     8760}
     8761
     8762static int
     8763ParallelepipedOrientOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8764                       Tcl_Obj *const *objv)
    87658765{
    87668766    double quat[4];
     
    87738773    if (objc == 7) {
    87748774        const char *name = Tcl_GetString(objv[6]);
    8775         g_renderer->setGraphicsObjectOrientation<Parallelpiped>(name, quat);
    8776     } else {
    8777         g_renderer->setGraphicsObjectOrientation<Parallelpiped>("all", quat);
    8778     }
    8779     return TCL_OK;
    8780 }
    8781 
    8782 static int
    8783 ParallelpipedOriginOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8784                       Tcl_Obj *const *objv)
     8775        g_renderer->setGraphicsObjectOrientation<Parallelepiped>(name, quat);
     8776    } else {
     8777        g_renderer->setGraphicsObjectOrientation<Parallelepiped>("all", quat);
     8778    }
     8779    return TCL_OK;
     8780}
     8781
     8782static int
     8783ParallelepipedOriginOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8784                       Tcl_Obj *const *objv)
    87858785{
    87868786    double origin[3];
     
    87928792    if (objc == 6) {
    87938793        const char *name = Tcl_GetString(objv[5]);
    8794         g_renderer->setGraphicsObjectOrigin<Parallelpiped>(name, origin);
    8795     } else {
    8796         g_renderer->setGraphicsObjectOrigin<Parallelpiped>("all", origin);
    8797     }
    8798     return TCL_OK;
    8799 }
    8800 
    8801 static int
    8802 ParallelpipedPositionOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8803                         Tcl_Obj *const *objv)
     8794        g_renderer->setGraphicsObjectOrigin<Parallelepiped>(name, origin);
     8795    } else {
     8796        g_renderer->setGraphicsObjectOrigin<Parallelepiped>("all", origin);
     8797    }
     8798    return TCL_OK;
     8799}
     8800
     8801static int
     8802ParallelepipedPositionOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8803                         Tcl_Obj *const *objv)
    88048804{
    88058805    double pos[3];
     
    88118811    if (objc == 6) {
    88128812        const char *name = Tcl_GetString(objv[5]);
    8813         g_renderer->setGraphicsObjectPosition<Parallelpiped>(name, pos);
    8814     } else {
    8815         g_renderer->setGraphicsObjectPosition<Parallelpiped>("all", pos);
    8816     }
    8817     return TCL_OK;
    8818 }
    8819 
    8820 static int
    8821 ParallelpipedScaleOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8822                      Tcl_Obj *const *objv)
     8813        g_renderer->setGraphicsObjectPosition<Parallelepiped>(name, pos);
     8814    } else {
     8815        g_renderer->setGraphicsObjectPosition<Parallelepiped>("all", pos);
     8816    }
     8817    return TCL_OK;
     8818}
     8819
     8820static int
     8821ParallelepipedScaleOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8822                      Tcl_Obj *const *objv)
    88238823{
    88248824    double scale[3];
     
    88308830    if (objc == 6) {
    88318831        const char *name = Tcl_GetString(objv[5]);
    8832         g_renderer->setGraphicsObjectScale<Parallelpiped>(name, scale);
    8833     } else {
    8834         g_renderer->setGraphicsObjectScale<Parallelpiped>("all", scale);
    8835     }
    8836     return TCL_OK;
    8837 }
    8838 
    8839 static int
    8840 ParallelpipedShadingOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8841                        Tcl_Obj *const *objv)
     8832        g_renderer->setGraphicsObjectScale<Parallelepiped>(name, scale);
     8833    } else {
     8834        g_renderer->setGraphicsObjectScale<Parallelepiped>("all", scale);
     8835    }
     8836    return TCL_OK;
     8837}
     8838
     8839static int
     8840ParallelepipedShadingOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8841                        Tcl_Obj *const *objv)
    88428842{
    88438843    GraphicsObject::ShadingModel shadeModel;
     
    88548854    if (objc == 4) {
    88558855        const char *name = Tcl_GetString(objv[3]);
    8856         g_renderer->setGraphicsObjectShadingModel<Parallelpiped>(name, shadeModel);
    8857     } else {
    8858         g_renderer->setGraphicsObjectShadingModel<Parallelpiped>("all", shadeModel);
    8859     }
    8860     return TCL_OK;
    8861 }
    8862 
    8863 static int
    8864 ParallelpipedVisibleOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8865                        Tcl_Obj *const *objv)
     8856        g_renderer->setGraphicsObjectShadingModel<Parallelepiped>(name, shadeModel);
     8857    } else {
     8858        g_renderer->setGraphicsObjectShadingModel<Parallelepiped>("all", shadeModel);
     8859    }
     8860    return TCL_OK;
     8861}
     8862
     8863static int
     8864ParallelepipedVisibleOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8865                        Tcl_Obj *const *objv)
    88668866{
    88678867    bool state;
     
    88718871    if (objc == 4) {
    88728872        const char *name = Tcl_GetString(objv[3]);
    8873         g_renderer->setGraphicsObjectVisibility<Parallelpiped>(name, state);
    8874     } else {
    8875         g_renderer->setGraphicsObjectVisibility<Parallelpiped>("all", state);
    8876     }
    8877     return TCL_OK;
    8878 }
    8879 
    8880 static int
    8881 ParallelpipedWireframeOp(ClientData clientData, Tcl_Interp *interp, int objc,
    8882                          Tcl_Obj *const *objv)
     8873        g_renderer->setGraphicsObjectVisibility<Parallelepiped>(name, state);
     8874    } else {
     8875        g_renderer->setGraphicsObjectVisibility<Parallelepiped>("all", state);
     8876    }
     8877    return TCL_OK;
     8878}
     8879
     8880static int
     8881ParallelepipedWireframeOp(ClientData clientData, Tcl_Interp *interp, int objc,
     8882                          Tcl_Obj *const *objv)
    88838883{
    88848884    bool state;
     
    88888888    if (objc == 4) {
    88898889        const char *name = Tcl_GetString(objv[3]);
    8890         g_renderer->setGraphicsObjectWireframe<Parallelpiped>(name, state);
    8891     } else {
    8892         g_renderer->setGraphicsObjectWireframe<Parallelpiped>("all", state);
    8893     }
    8894     return TCL_OK;
    8895 }
    8896 
    8897 static Rappture::CmdSpec parallelpipedOps[] = {
    8898     {"add",       1, ParallelpipedAddOp, 12, 12, "v0x v0y v0z v1x v1y v1z v2x v2y v2z name"},
    8899     {"color",     2, ParallelpipedColorOp, 5, 6, "r g b ?name?"},
    8900     {"culling",   2, ParallelpipedCullingOp, 3, 4, "bool ?name?"},
    8901     {"delete",    1, ParallelpipedDeleteOp, 2, 3, "?name?"},
    8902     {"edges",     1, ParallelpipedEdgeVisibilityOp, 3, 4, "bool ?name?"},
    8903     {"flipnorms", 1, ParallelpipedFlipNormalsOp, 3, 4, "bool ?name?"},
    8904     {"lighting",  3, ParallelpipedLightingOp, 3, 4, "bool ?name?"},
    8905     {"linecolor", 5, ParallelpipedLineColorOp, 5, 6, "r g b ?name?"},
    8906     {"linewidth", 5, ParallelpipedLineWidthOp, 3, 4, "width ?name?"},
    8907     {"material",  1, ParallelpipedMaterialOp, 6, 7, "ambientCoeff diffuseCoeff specularCoeff specularPower ?name?"},
    8908     {"opacity",   2, ParallelpipedOpacityOp, 3, 4, "value ?name?"},
    8909     {"orient",    4, ParallelpipedOrientOp, 6, 7, "qw qx qy qz ?name?"},
    8910     {"origin",    4, ParallelpipedOriginOp, 5, 6, "x y z ?name?"},
    8911     {"pos",       1, ParallelpipedPositionOp, 5, 6, "x y z ?name?"},
    8912     {"scale",     2, ParallelpipedScaleOp, 5, 6, "sx sy sz ?name?"},
    8913     {"shading",   2, ParallelpipedShadingOp, 3, 4, "val ?name?"},
    8914     {"visible",   1, ParallelpipedVisibleOp, 3, 4, "bool ?name?"},
    8915     {"wireframe", 1, ParallelpipedWireframeOp, 3, 4, "bool ?name?"}
     8890        g_renderer->setGraphicsObjectWireframe<Parallelepiped>(name, state);
     8891    } else {
     8892        g_renderer->setGraphicsObjectWireframe<Parallelepiped>("all", state);
     8893    }
     8894    return TCL_OK;
     8895}
     8896
     8897static Rappture::CmdSpec parallelepipedOps[] = {
     8898    {"add",       1, ParallelepipedAddOp, 12, 12, "v0x v0y v0z v1x v1y v1z v2x v2y v2z name"},
     8899    {"color",     2, ParallelepipedColorOp, 5, 6, "r g b ?name?"},
     8900    {"culling",   2, ParallelepipedCullingOp, 3, 4, "bool ?name?"},
     8901    {"delete",    1, ParallelepipedDeleteOp, 2, 3, "?name?"},
     8902    {"edges",     1, ParallelepipedEdgeVisibilityOp, 3, 4, "bool ?name?"},
     8903    {"flipnorms", 1, ParallelepipedFlipNormalsOp, 3, 4, "bool ?name?"},
     8904    {"lighting",  3, ParallelepipedLightingOp, 3, 4, "bool ?name?"},
     8905    {"linecolor", 5, ParallelepipedLineColorOp, 5, 6, "r g b ?name?"},
     8906    {"linewidth", 5, ParallelepipedLineWidthOp, 3, 4, "width ?name?"},
     8907    {"material",  1, ParallelepipedMaterialOp, 6, 7, "ambientCoeff diffuseCoeff specularCoeff specularPower ?name?"},
     8908    {"opacity",   2, ParallelepipedOpacityOp, 3, 4, "value ?name?"},
     8909    {"orient",    4, ParallelepipedOrientOp, 6, 7, "qw qx qy qz ?name?"},
     8910    {"origin",    4, ParallelepipedOriginOp, 5, 6, "x y z ?name?"},
     8911    {"pos",       1, ParallelepipedPositionOp, 5, 6, "x y z ?name?"},
     8912    {"scale",     2, ParallelepipedScaleOp, 5, 6, "sx sy sz ?name?"},
     8913    {"shading",   2, ParallelepipedShadingOp, 3, 4, "val ?name?"},
     8914    {"visible",   1, ParallelepipedVisibleOp, 3, 4, "bool ?name?"},
     8915    {"wireframe", 1, ParallelepipedWireframeOp, 3, 4, "bool ?name?"}
    89168916};
    8917 static int nParallelpipedOps = NumCmdSpecs(parallelpipedOps);
    8918 
    8919 static int
    8920 ParallelpipedCmd(ClientData clientData, Tcl_Interp *interp, int objc,
     8917static int nParallelepipedOps = NumCmdSpecs(parallelepipedOps);
     8918
     8919static int
     8920ParallelepipedCmd(ClientData clientData, Tcl_Interp *interp, int objc,
    89218921       Tcl_Obj *const *objv)
    89228922{
    89238923    Tcl_ObjCmdProc *proc;
    89248924
    8925     proc = Rappture::GetOpFromObj(interp, nParallelpipedOps, parallelpipedOps,
     8925    proc = Rappture::GetOpFromObj(interp, nParallelepipedOps, parallelepipedOps,
    89268926                                  Rappture::CMDSPEC_ARG1, objc, objv, 0);
    89278927    if (proc == NULL) {
     
    1260112601{
    1260212602    Tcl_MakeSafe(interp);
    12603     Tcl_CreateObjCommand(interp, "arc",           ArcCmd,           clientData, NULL);
    12604     Tcl_CreateObjCommand(interp, "arrow",         ArrowCmd,         clientData, NULL);
    12605     Tcl_CreateObjCommand(interp, "axis",          AxisCmd,          clientData, NULL);
    12606     Tcl_CreateObjCommand(interp, "box",           BoxCmd,           clientData, NULL);
    12607     Tcl_CreateObjCommand(interp, "camera",        CameraCmd,        clientData, NULL);
    12608     Tcl_CreateObjCommand(interp, "clientinfo",    ClientInfoCmd,    clientData, NULL);
    12609     Tcl_CreateObjCommand(interp, "colormap",      ColorMapCmd,      clientData, NULL);
    12610     Tcl_CreateObjCommand(interp, "cone",          ConeCmd,          clientData, NULL);
    12611     Tcl_CreateObjCommand(interp, "contour2d",     Contour2DCmd,     clientData, NULL);
    12612     Tcl_CreateObjCommand(interp, "contour3d",     Contour3DCmd,     clientData, NULL);
    12613     Tcl_CreateObjCommand(interp, "cutplane",      CutplaneCmd,      clientData, NULL);
    12614     Tcl_CreateObjCommand(interp, "cylinder",      CylinderCmd,      clientData, NULL);
    12615     Tcl_CreateObjCommand(interp, "dataset",       DataSetCmd,       clientData, NULL);
    12616     Tcl_CreateObjCommand(interp, "disk",          DiskCmd,          clientData, NULL);
    12617     Tcl_CreateObjCommand(interp, "glyphs",        GlyphsCmd,        clientData, NULL);
    12618     Tcl_CreateObjCommand(interp, "group",         GroupCmd,         clientData, NULL);
    12619     Tcl_CreateObjCommand(interp, "heightmap",     HeightMapCmd,     clientData, NULL);
    12620     Tcl_CreateObjCommand(interp, "image",         ImageCmd,         clientData, NULL);
    12621     Tcl_CreateObjCommand(interp, "imgflush",      ImageFlushCmd,    clientData, NULL);
    12622     Tcl_CreateObjCommand(interp, "legend",        LegendCmd,        clientData, NULL);
    12623     Tcl_CreateObjCommand(interp, "legend2",       LegendSimpleCmd,  clientData, NULL);
    12624     Tcl_CreateObjCommand(interp, "lic",           LICCmd,           clientData, NULL);
    12625     Tcl_CreateObjCommand(interp, "line",          LineCmd,          clientData, NULL);
    12626     Tcl_CreateObjCommand(interp, "molecule",      MoleculeCmd,      clientData, NULL);
    12627     Tcl_CreateObjCommand(interp, "outline",       OutlineCmd,       clientData, NULL);
    12628     Tcl_CreateObjCommand(interp, "parallelpiped", ParallelpipedCmd, clientData, NULL);
    12629     Tcl_CreateObjCommand(interp, "polydata",      PolyDataCmd,      clientData, NULL);
    12630     Tcl_CreateObjCommand(interp, "polygon",       PolygonCmd,       clientData, NULL);
    12631     Tcl_CreateObjCommand(interp, "pseudocolor",   PseudoColorCmd,   clientData, NULL);
    12632     Tcl_CreateObjCommand(interp, "renderer",      RendererCmd,      clientData, NULL);
    12633     Tcl_CreateObjCommand(interp, "screen",        ScreenCmd,        clientData, NULL);
    12634     Tcl_CreateObjCommand(interp, "sphere",        SphereCmd,        clientData, NULL);
    12635     Tcl_CreateObjCommand(interp, "streamlines",   StreamlinesCmd,   clientData, NULL);
    12636     Tcl_CreateObjCommand(interp, "text3d",        Text3DCmd,        clientData, NULL);
    12637     Tcl_CreateObjCommand(interp, "volume",        VolumeCmd,        clientData, NULL);
    12638     Tcl_CreateObjCommand(interp, "warp",          WarpCmd,          clientData, NULL);
     12603    Tcl_CreateObjCommand(interp, "arc",            ArcCmd,            clientData, NULL);
     12604    Tcl_CreateObjCommand(interp, "arrow",          ArrowCmd,          clientData, NULL);
     12605    Tcl_CreateObjCommand(interp, "axis",           AxisCmd,           clientData, NULL);
     12606    Tcl_CreateObjCommand(interp, "box",            BoxCmd,            clientData, NULL);
     12607    Tcl_CreateObjCommand(interp, "camera",         CameraCmd,         clientData, NULL);
     12608    Tcl_CreateObjCommand(interp, "clientinfo",     ClientInfoCmd,     clientData, NULL);
     12609    Tcl_CreateObjCommand(interp, "colormap",       ColorMapCmd,       clientData, NULL);
     12610    Tcl_CreateObjCommand(interp, "cone",           ConeCmd,           clientData, NULL);
     12611    Tcl_CreateObjCommand(interp, "contour2d",      Contour2DCmd,      clientData, NULL);
     12612    Tcl_CreateObjCommand(interp, "contour3d",      Contour3DCmd,      clientData, NULL);
     12613    Tcl_CreateObjCommand(interp, "cutplane",       CutplaneCmd,       clientData, NULL);
     12614    Tcl_CreateObjCommand(interp, "cylinder",       CylinderCmd,       clientData, NULL);
     12615    Tcl_CreateObjCommand(interp, "dataset",        DataSetCmd,        clientData, NULL);
     12616    Tcl_CreateObjCommand(interp, "disk",           DiskCmd,           clientData, NULL);
     12617    Tcl_CreateObjCommand(interp, "glyphs",         GlyphsCmd,         clientData, NULL);
     12618    Tcl_CreateObjCommand(interp, "group",          GroupCmd,          clientData, NULL);
     12619    Tcl_CreateObjCommand(interp, "heightmap",      HeightMapCmd,      clientData, NULL);
     12620    Tcl_CreateObjCommand(interp, "image",          ImageCmd,          clientData, NULL);
     12621    Tcl_CreateObjCommand(interp, "imgflush",       ImageFlushCmd,     clientData, NULL);
     12622    Tcl_CreateObjCommand(interp, "legend",         LegendCmd,         clientData, NULL);
     12623    Tcl_CreateObjCommand(interp, "legend2",        LegendSimpleCmd,   clientData, NULL);
     12624    Tcl_CreateObjCommand(interp, "lic",            LICCmd,            clientData, NULL);
     12625    Tcl_CreateObjCommand(interp, "line",           LineCmd,           clientData, NULL);
     12626    Tcl_CreateObjCommand(interp, "molecule",       MoleculeCmd,       clientData, NULL);
     12627    Tcl_CreateObjCommand(interp, "outline",        OutlineCmd,        clientData, NULL);
     12628    Tcl_CreateObjCommand(interp, "parallelepiped", ParallelepipedCmd, clientData, NULL);
     12629    Tcl_CreateObjCommand(interp, "polydata",       PolyDataCmd,       clientData, NULL);
     12630    Tcl_CreateObjCommand(interp, "polygon",        PolygonCmd,        clientData, NULL);
     12631    Tcl_CreateObjCommand(interp, "pseudocolor",    PseudoColorCmd,    clientData, NULL);
     12632    Tcl_CreateObjCommand(interp, "renderer",       RendererCmd,       clientData, NULL);
     12633    Tcl_CreateObjCommand(interp, "screen",         ScreenCmd,         clientData, NULL);
     12634    Tcl_CreateObjCommand(interp, "sphere",         SphereCmd,         clientData, NULL);
     12635    Tcl_CreateObjCommand(interp, "streamlines",    StreamlinesCmd,    clientData, NULL);
     12636    Tcl_CreateObjCommand(interp, "text3d",         Text3DCmd,         clientData, NULL);
     12637    Tcl_CreateObjCommand(interp, "volume",         VolumeCmd,         clientData, NULL);
     12638    Tcl_CreateObjCommand(interp, "warp",           WarpCmd,           clientData, NULL);
    1263912639}
    1264012640
     
    1266912669    Tcl_DeleteCommand(interp, "molecule");
    1267012670    Tcl_DeleteCommand(interp, "outline");
    12671     Tcl_DeleteCommand(interp, "parallelpiped");
     12671    Tcl_DeleteCommand(interp, "parallelepiped");
    1267212672    Tcl_DeleteCommand(interp, "polydata");
    1267312673    Tcl_DeleteCommand(interp, "polygon");
Note: See TracChangeset for help on using the changeset viewer.