Fix spacing issues with list parsing

Author: mgreter

src/ast.hpp

@@ -1401,10 +1401,11 @@ namespace Sass {
   ////////////////////////////////////////////////////////
   class String_Quoted : public String_Constant {
   public:
-    String_Quoted(ParserState pstate, std::string val)
+    String_Quoted(ParserState pstate, std::string val, char q = 0)
     : String_Constant(pstate, val)
     {
       value_ = unquote(value_, &quote_mark_);
+      if (q && quote_mark_) quote_mark_ = q;
     }
     virtual bool operator==(const Expression& rhs) const;
     virtual std::string to_string(bool compressed = false, int precision = 5) const;

src/parser.cpp

@@ -1365,7 +1365,14 @@ namespace Sass {
       return parse_function_call_schema();
     }
     else if (lex< identifier_schema >()) {
-      return parse_identifier_schema();
+      String* string = parse_identifier_schema();
+      if (String_Schema* schema = dynamic_cast<String_Schema*>(string)) {
+        if (lex < exactly < '(' > >()) {
+          *schema << parse_list();
+          lex < exactly < ')' > >();
+        }
+      }
+      return string;
     }
     else if (peek< re_functional >()) {
       return parse_function_call();
@@ -1598,13 +1605,14 @@ namespace Sass {
       css_error("Invalid CSS", " after ", ": expected expression (e.g. 1px, bold), was ");
     }
 
+    const char* e = 0;
     size_t num_items = 0;
     while (position < stop) {
       // parse space between tokens
       if (lex< spaces >() && num_items) {
         (*schema) << new (ctx.mem) String_Constant(pstate, " ");
       }
-      if (peek< re_functional >()) {
+      if ((e = peek< re_functional >()) && e < stop) {
         (*schema) << parse_function_call();
       }
       // lex an interpolant /#{...}/
@@ -1621,10 +1629,16 @@ namespace Sass {
       // lex some string constants
       else if (lex< alternatives < exactly<'%'>, exactly < '-' >, identifier > >()) {
         (*schema) << new (ctx.mem) String_Constant(pstate, lexed);
+        if (*position == '"' || *position == '\'') {
+          (*schema) << new (ctx.mem) String_Constant(pstate, " ");
+        }
       }
       // lex a quoted string
       else if (lex< quoted_string >()) {
-        (*schema) << new (ctx.mem) String_Quoted(pstate, lexed);
+        (*schema) << new (ctx.mem) String_Quoted(pstate, lexed, '"');
+        if (*position == '"' || *position == '\'' || alpha(position)) {
+          (*schema) << new (ctx.mem) String_Constant(pstate, " ");
+        }
       }
       // lex (normalized) variable
       else if (lex< variable >()) {
@@ -1680,7 +1694,9 @@ namespace Sass {
       if (p) {
         if (i < p) {
           // accumulate the preceding segment if it's nonempty
-          (*schema) << new (ctx.mem) String_Constant(pstate, std::string(i, p));
+          const char* o = position; position = i;
+          *schema << parse_value_schema(p);
+          position = o;
         }
         // we need to skip anything inside strings
         // create a new target in parser/prelexer
@@ -1702,7 +1718,11 @@ namespace Sass {
         }
       }
       else { // no interpolants left; add the last segment if nonempty
-        if (i < end) (*schema) << new (ctx.mem) String_Constant(pstate, std::string(i, id.end));
+        if (i < end) {
+          const char* o = position; position = i;
+          *schema << parse_value_schema(id.end);
+          position = o;
+        }
         break;
       }
     }

src/prelexer.cpp

@@ -143,6 +143,7 @@ namespace Sass {
                      alternatives <
                        digits,
                        identifier,
+                       quoted_string,
                        exactly<'+'>,
                        exactly<'-'>
                      >