Revision: 76636
          http://sourceforge.net/p/brlcad/code/76636
Author:   starseeker
Date:     2020-08-01 23:15:16 +0000 (Sat, 01 Aug 2020)
Log Message:
-----------
Fix initialization of subprocess I/O in MGED.

Modified Paths:
--------------
    brlcad/branches/bioh/src/mged/mged.c
    brlcad/branches/bioh/src/mged/setup.c

Modified: brlcad/branches/bioh/src/mged/mged.c
===================================================================
--- brlcad/branches/bioh/src/mged/mged.c        2020-08-01 20:59:40 UTC (rev 
76635)
+++ brlcad/branches/bioh/src/mged/mged.c        2020-08-01 23:15:16 UTC (rev 
76636)
@@ -2780,6 +2780,13 @@
     GEDP->ged_create_vlist_solid_callback = createDListSolid;
     GEDP->ged_create_vlist_display_list_callback = createDListAll;
     GEDP->ged_destroy_vlist_callback = freeDListsAll;
+    GEDP->ged_create_io_handler = &tclcad_create_io_handler;
+    GEDP->ged_delete_io_handler = &tclcad_delete_io_handler;
+    struct tclcad_io_data *t_iod;
+    BU_GET(t_iod, struct tclcad_io_data);
+    t_iod->io_mode = TCL_READABLE;
+    t_iod->interp = interpreter;
+    GEDP->ged_io_data = t_iod;
 
     /* increment use count for gedp db instance */
     (void)db_clone_dbi(DBIP, NULL);

Modified: brlcad/branches/bioh/src/mged/setup.c
===================================================================
--- brlcad/branches/bioh/src/mged/setup.c       2020-08-01 20:59:40 UTC (rev 
76635)
+++ brlcad/branches/bioh/src/mged/setup.c       2020-08-01 23:15:16 UTC (rev 
76636)
@@ -478,14 +478,6 @@
     GEDP->ged_interp = (void *)*interpreter;
     GEDP->ged_interp_eval = &mged_db_search_callback;
 
-    struct tclcad_io_data *t_iod;
-    BU_GET(t_iod, struct tclcad_io_data);
-    t_iod->io_mode = TCL_READABLE;
-    t_iod->interp = *interpreter;
-    GEDP->ged_io_data = t_iod;
-    GEDP->ged_create_io_handler = &tclcad_create_io_handler;
-    GEDP->ged_delete_io_handler = &tclcad_delete_io_handler;
-
     /* Tcl needs to write nulls onto subscripted variable names */
     bu_vls_printf(&str, "%s(state)", MGED_DISPLAY_VAR);
     Tcl_SetVar(*interpreter, bu_vls_addr(&str), state_str[STATE], 
TCL_GLOBAL_ONLY);

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.



_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to