Revision: 77538
http://sourceforge.net/p/brlcad/code/77538
Author: starseeker
Date: 2020-10-22 14:50:24 +0000 (Thu, 22 Oct 2020)
Log Message:
-----------
Be more verbose if tclcad_init fails in asc2g processing.
Modified Paths:
--------------
brlcad/trunk/src/conv/asc/asc2g.c
Modified: brlcad/trunk/src/conv/asc/asc2g.c
===================================================================
--- brlcad/trunk/src/conv/asc/asc2g.c 2020-10-22 14:43:33 UTC (rev 77537)
+++ brlcad/trunk/src/conv/asc/asc2g.c 2020-10-22 14:50:24 UTC (rev 77538)
@@ -1572,6 +1572,8 @@
if (!bu_vls_strncmp(&line, &str_title, 5) || !bu_vls_strncmp(&line,
&str_put, 4)) {
Tcl_Interp *interp;
Tcl_Interp *safe_interp;
+ struct bu_vls msg = BU_VLS_INIT_ZERO;
+ int tret = 0;
/* this is a Tcl script */
@@ -1580,7 +1582,11 @@
BU_LIST_INIT(&RTG.rtg_headwdb.l);
interp = Tcl_CreateInterp();
- tclcad_init(interp, 0, NULL);
+ tret = tclcad_init(interp, 0, &msg);
+ if (tret == TCL_ERROR) {
+ bu_log("tclcad_init error: %s\n", bu_vls_cstr(&msg));
+ }
+ bu_vls_free(&msg);
wdb_close(ofp);
{
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
