Revision: 65575
http://sourceforge.net/p/brlcad/code/65575
Author: starseeker
Date: 2015-07-11 20:58:06 +0000 (Sat, 11 Jul 2015)
Log Message:
-----------
Remove another Tcl_SplitList
Modified Paths:
--------------
brlcad/trunk/src/librt/db_tree.c
Modified: brlcad/trunk/src/librt/db_tree.c
===================================================================
--- brlcad/trunk/src/librt/db_tree.c 2015-07-11 20:51:19 UTC (rev 65574)
+++ brlcad/trunk/src/librt/db_tree.c 2015-07-11 20:58:06 UTC (rev 65575)
@@ -2573,21 +2573,20 @@
/* Skip over leading spaces in input */
while (*str && isspace((int)*str)) str++;
- /*XXX Temporarily use brlcad_interp until a replacement for Tcl_SplitList
is created */
- if (Tcl_SplitList(brlcad_interp, str, &argc, (const char ***)&argv) !=
TCL_OK)
+ if (bu_argv_from_tcl_list(str, &argc, (const char ***)&argv) != 0)
return TREE_NULL;
if (argc <= 0 || argc > 3) {
bu_vls_printf(vls,
"db_tree_parse: tree node does not have 1, 2 or 3
elements: %s\n",
str);
- Tcl_Free((char *)argv); /* not bu_free(), not free() */
+ bu_free((char *)argv, "argv");
return TREE_NULL;
}
if (argv[0][1] != '\0') {
bu_vls_printf(vls, "db_tree_parse() operator is not single character:
%s", argv[0]);
- Tcl_Free((char *)argv); /* not bu_free(), not free() */
+ bu_free((char *)argv, "argv");
return TREE_NULL;
}
@@ -2711,8 +2710,7 @@
}
}
- /*XXX Temporarily using tcl for its Tcl_SplitList */
- Tcl_Free((char *)argv); /* not bu_free(), not free() */
+ bu_free((char *)argv, "argv");
return tp;
}
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
Don't Limit Your Business. Reach for the Cloud.
GigeNET's Cloud Solutions provide you with the tools and support that
you need to offload your IT needs and focus on growing your business.
Configured For All Businesses. Start Your Cloud Today.
https://www.gigenetcloud.com/
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
