Adding $bracketed parameter to join() built-in function

Author: delapuente

src/functions.cpp

@@ -1330,7 +1330,7 @@ namespace Sass {
       return SASS_MEMORY_NEW(Null, pstate);
     }
 
-    Signature join_sig = "join($list1, $list2, $separator: auto)";
+    Signature join_sig = "join($list1, $list2, $separator: auto, $bracketed: auto)";
     BUILT_IN(join)
     {
       Map_Obj m1 = SASS_MEMORY_CAST(Map, env["$list1"]);
@@ -1339,10 +1339,13 @@ namespace Sass {
       List_Obj l2 = SASS_MEMORY_CAST(List, env["$list2"]);
       String_Constant_Obj sep = ARG("$separator", String_Constant);
       enum Sass_Separator sep_val = (l1 ? l1->separator() : SASS_SPACE);
+      Value* bracketed = ARG("$bracketed", Value);
+      enum Sass_List_Delimiter delimiter = (l1 ? l1->delimiter() : SASS_NO_DELIMITER);
       if (!l1) {
         l1 = SASS_MEMORY_NEW(List, pstate, 1);
         l1->append(ARG("$list1", Expression));
         sep_val = (l2 ? l2->separator() : SASS_SPACE);
+        delimiter = (l2 ? l2->delimiter() : SASS_NO_DELIMITER);
       }
       if (!l2) {
         l2 = SASS_MEMORY_NEW(List, pstate, 1);
@@ -1360,7 +1363,12 @@ namespace Sass {
       if (sep_str == "space") sep_val = SASS_SPACE;
       else if (sep_str == "comma") sep_val = SASS_COMMA;
       else if (sep_str != "auto") error("argument `$separator` of `" + std::string(sig) + "` must be `space`, `comma`, or `auto`", pstate);
-      List_Obj result = SASS_MEMORY_NEW(List, pstate, len, sep_val);
+      String_Constant_Obj bracketed_as_str = SASS_MEMORY_CAST_PTR(String_Constant, bracketed);
+      bool bracketed_is_auto = bracketed_as_str && unquote(bracketed_as_str->value()) == "auto";
+      if (!bracketed_is_auto) {
+        delimiter = bracketed->is_false() ? SASS_NO_DELIMITER : SASS_BRACKETS;
+      }
+      List_Obj result = SASS_MEMORY_NEW(List, pstate, len, sep_val, false, delimiter);
       result->concat(&l1);
       result->concat(&l2);
       return result.detach();