Merge pull request #211 from adrianVmariano/master

fixed in_list bug

arrays.scad

@@ -91,7 +91,11 @@ function slice(arr,st,end) = let(
 //   in_list("bar", ["foo", "bar", "baz"]);  // Returns true.
 //   in_list("bee", ["foo", "bar", "baz"]);  // Returns false.
 //   in_list("bar", [[2,"foo"], [4,"bar"], [3,"baz"]], idx=1);  // Returns true.
-function in_list(x,l,idx=undef) = search([x], l, num_returns_per_match=1, index_col_num=idx) != [[]];
+function in_list(val,list,idx=undef) = 
+    let( s = search([val], list, num_returns_per_match=1, index_col_num=idx)[0] )
+    s==[] ? false
+    : is_undef(idx) ? val==list[s] 
+    : val==list[s][idx];
 
 
 // Function: min_index()

tests/hull.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/hull.scad>
+include <../hull.scad>
 
 
 testpoints_on_sphere = [ for(p = 

tests/polyhedra.scad

@@ -1,5 +1,5 @@
-include<BOSL2/std.scad>
+include<../std.scad>
-include<BOSL2/polyhedra.scad>
+include<../polyhedra.scad>
 
 
 $fn=96;

tests/test_affine.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_ident() {

tests/test_arrays.scad

@@ -1,5 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-
 
 // List/Array Ops
 
@@ -16,6 +15,11 @@ module test_in_list() {
     assert(in_list("bar", ["foo", "bar", "baz"]));
     assert(!in_list("bee", ["foo", "bar", "baz"]));
     assert(in_list("bar", [[2,"foo"], [4,"bar"], [3,"baz"]], idx=1));
+    assert(!in_list(undef, [3,4,5]));
+    assert(in_list(undef,[3,4,undef,5]));
+    assert(!in_list(3,[]));
+    assert(!in_list(3,[4,5,[3]]));
+    
 }
 test_in_list();
 

tests/test_common.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_typeof() {

tests/test_coords.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_point2d() {

tests/test_cubetruss.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/cubetruss.scad>
+include <../cubetruss.scad>
 
 
 module test_cubetruss_dist() {

tests/test_debug.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_standard_anchors() {

tests/test_edges.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_is_edge_array() {

tests/test_errors.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 // Can't test echo output as yet.  Include these for coverage calculations.

tests/test_geometry.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_point_on_segment2d() {

tests/test_linear_bearings.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/linear_bearings.scad>
+include <../linear_bearings.scad>
 
 
 module test_get_lmXuu_bearing_diam() {

tests/test_math.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 // Simple Calculations
 

tests/test_mutators.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_HSL() {

tests/test_primitives.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_square() {

tests/test_quaternions.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/strings.scad>
+include <../strings.scad>
 
 
 function rec_cmp(a,b,eps=1e-9) =

tests/test_queues.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/queues.scad>
+include <../queues.scad>
 
 
 module test_queue_init() {

tests/test_shapes.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/hull.scad>
+include <../hull.scad>
 
 
 module test_prismoid() {

tests/test_shapes2d.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_turtle() {

tests/test_skin.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/skin.scad>
+include <../skin.scad>
 
 
 module test_skin() {

tests/test_stacks.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/stacks.scad>
+include <../stacks.scad>
 
 
 module test_stack_init() {

tests/test_strings.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/strings.scad>
+include <../strings.scad>
 
 
 module test_upcase() {

tests/test_structs.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/structs.scad>
+include <../structs.scad>
 
 
 module test_struct_set() {

tests/test_transforms.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_translate() {

tests/test_vectors.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_is_vector() {
@@ -60,7 +60,7 @@ module test_vabs() {
 }
 test_vabs();
 
-include <BOSL2/strings.scad>
+include <../strings.scad>
 module test_vang() {
     assert(vang([1,0])==0);
     assert(vang([0,1])==90);

tests/test_version.scad

@@ -1,4 +1,4 @@
-include <BOSL2/std.scad>
+include <../std.scad>
 
 
 module test_bosl_version() {

tests/test_vnf.scad

@@ -1,5 +1,5 @@
-include <BOSL2/std.scad>
+include <../std.scad>
-include <BOSL2/vnf.scad>
+include <../vnf.scad>
 
 
 module test_is_vnf() {