Changeset 4829

Timestamp:

Dec 9, 2014 9:36:27 PM (9 years ago)

Author:

ldelgass

Message:

Add stub imgflush command

File:

• nanovis/branches/1.1/Command.cpp (modified) (3 diffs)

nanovis/branches/1.1/Command.cpp

@@ -98 +98 @@
 }";
 
+static int lastCmdStatus;
+
 bool
 GetBooleanFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, bool *boolPtr)
@@ -2130 +2132 @@
 }
 
+static int
+ImageFlushCmd(ClientData clientData, Tcl_Interp *interp, int objc, 
+              Tcl_Obj *const *objv)
+{
+    lastCmdStatus = TCL_BREAK;
+    return TCL_OK;
+}
+
 Tcl_Interp *
 initTcl()
@@ -2145 +2155 @@
     Tcl_CreateObjCommand(interp, "grid",        GridCmd,        NULL, NULL);
     Tcl_CreateObjCommand(interp, "heightmap",   HeightMapCmd,   NULL, NULL);
+    Tcl_CreateObjCommand(interp, "imgflush",    ImageFlushCmd,  NULL, NULL);
     Tcl_CreateObjCommand(interp, "legend",      LegendCmd,      NULL, NULL);
     Tcl_CreateObjCommand(interp, "screen",      ScreenCmd,      NULL, NULL);