zuora_connect_ui 0.8.1 → 0.8.2

data/vendor/ruby/2.6.0/gems/sassc-2.1.0-x86_64-linux/ext/libsass/src/debugger.hpp

@@ -0,0 +1,807 @@
+#ifndef SASS_DEBUGGER_H
+#define SASS_DEBUGGER_H
+
+#include <string>
+#include <sstream>
+#include "node.hpp"
+#include "ast_fwd_decl.hpp"
+
+using namespace Sass;
+
+inline void debug_ast(AST_Node* node, std::string ind = "", Env* env = 0);
+
+inline void debug_ast(const AST_Node* node, std::string ind = "", Env* env = 0) {
+  debug_ast(const_cast<AST_Node*>(node), ind, env);
+}
+
+inline void debug_sources_set(ComplexSelectorSet& set, std::string ind = "")
+{
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+  for(auto const &pair : set) {
+    debug_ast(pair, ind + "");
+    // debug_ast(set[pair], ind + "first: ");
+  }
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+}
+
+inline std::string str_replace(std::string str, const std::string& oldStr, const std::string& newStr)
+{
+  size_t pos = 0;
+  while((pos = str.find(oldStr, pos)) != std::string::npos)
+  {
+     str.replace(pos, oldStr.length(), newStr);
+     pos += newStr.length();
+  }
+  return str;
+}
+
+inline std::string prettyprint(const std::string& str) {
+  std::string clean = str_replace(str, "\n", "\\n");
+  clean = str_replace(clean, "	", "\\t");
+  clean = str_replace(clean, "\r", "\\r");
+  return clean;
+}
+
+inline std::string longToHex(long long t) {
+  std::stringstream is;
+  is << std::hex << t;
+  return is.str();
+}
+
+inline std::string pstate_source_position(AST_Node* node)
+{
+  std::stringstream str;
+  Position start(node->pstate());
+  Position end(start + node->pstate().offset);
+  str << (start.file == std::string::npos ? -1 : start.file)
+    << "@[" << start.line << ":" << start.column << "]"
+    << "-[" << end.line << ":" << end.column << "]";
+#ifdef DEBUG_SHARED_PTR
+      str << "x" << node->getRefCount() << ""
+      << " " << node->getDbgFile()
+      << "@" << node->getDbgLine();
+#endif
+  return str.str();
+}
+
+inline void debug_ast(AST_Node* node, std::string ind, Env* env)
+{
+  if (node == 0) return;
+  if (ind == "") std::cerr << "####################################################################\n";
+  if (Cast<Bubble>(node)) {
+    Bubble* bubble = Cast<Bubble>(node);
+    std::cerr << ind << "Bubble " << bubble;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << bubble->tabs();
+    std::cerr << std::endl;
+    debug_ast(bubble->node(), ind + " ", env);
+  } else if (Cast<Trace>(node)) {
+    Trace* trace = Cast<Trace>(node);
+    std::cerr << ind << "Trace " << trace;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+    << " [name:" << trace->name() << ", type: " << trace->type() << "]"
+    << std::endl;
+    debug_ast(trace->block(), ind + " ", env);
+  } else if (Cast<At_Root_Block>(node)) {
+    At_Root_Block* root_block = Cast<At_Root_Block>(node);
+    std::cerr << ind << "At_Root_Block " << root_block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << root_block->tabs();
+    std::cerr << std::endl;
+    debug_ast(root_block->expression(), ind + ":", env);
+    debug_ast(root_block->block(), ind + " ", env);
+  } else if (Cast<Selector_List>(node)) {
+    Selector_List* selector = Cast<Selector_List>(node);
+    std::cerr << ind << "Selector_List " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " [@media:" << selector->media_block() << "]";
+    std::cerr << (selector->is_invisible() ? " [INVISIBLE]": " -");
+    std::cerr << (selector->has_placeholder() ? " [PLACEHOLDER]": " -");
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+    debug_ast(selector->schema(), ind + "#{} ");
+
+    for(const Complex_Selector_Obj& i : selector->elements()) { debug_ast(i, ind + " ", env); }
+
+//  } else if (Cast<Expression>(node)) {
+//    Expression* expression = Cast<Expression>(node);
+//    std::cerr << ind << "Expression " << expression << " " << expression->concrete_type() << std::endl;
+
+  } else if (Cast<Parent_Reference>(node)) {
+    Parent_Reference* selector = Cast<Parent_Reference>(node);
+    std::cerr << ind << "Parent_Reference " << selector;
+//    if (selector->not_selector()) cerr << " [in_declaration]";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <" << prettyprint(selector->pstate().token.ws_before()) << ">" << std::endl;
+//    debug_ast(selector->selector(), ind + "->", env);
+
+  } else if (Cast<Parent_Selector>(node)) {
+    Parent_Selector* selector = Cast<Parent_Selector>(node);
+    std::cerr << ind << "Parent_Selector " << selector;
+//    if (selector->not_selector()) cerr << " [in_declaration]";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " [" << (selector->real() ? "REAL" : "FAKE") << "]";
+    std::cerr << " <" << prettyprint(selector->pstate().token.ws_before()) << ">" << std::endl;
+//    debug_ast(selector->selector(), ind + "->", env);
+
+  } else if (Cast<Complex_Selector>(node)) {
+    Complex_Selector* selector = Cast<Complex_Selector>(node);
+    std::cerr << ind << "Complex_Selector " << selector
+      << " (" << pstate_source_position(node) << ")"
+      << " <" << selector->hash() << ">"
+      << " [length:" << longToHex(selector->length()) << "]"
+      << " [weight:" << longToHex(selector->specificity()) << "]"
+      << " [@media:" << selector->media_block() << "]"
+      << (selector->is_invisible() ? " [INVISIBLE]": " -")
+      << (selector->has_placeholder() ? " [PLACEHOLDER]": " -")
+      << (selector->is_optional() ? " [is_optional]": " -")
+      << (selector->has_parent_ref() ? " [has parent]": " -")
+      << (selector->has_line_feed() ? " [line-feed]": " -")
+      << (selector->has_line_break() ? " [line-break]": " -")
+      << " -- ";
+      std::string del;
+      switch (selector->combinator()) {
+        case Complex_Selector::PARENT_OF:   del = ">"; break;
+        case Complex_Selector::PRECEDES:    del = "~"; break;
+        case Complex_Selector::ADJACENT_TO: del = "+"; break;
+        case Complex_Selector::ANCESTOR_OF: del = " "; break;
+        case Complex_Selector::REFERENCE:   del = "//"; break;
+      }
+      // if (del = "/") del += selector->reference()->perform(&to_string) + "/";
+    std::cerr << " <" << prettyprint(selector->pstate().token.ws_before()) << ">" << std::endl;
+    debug_ast(selector->head(), ind + " " /* + "[" + del + "]" */, env);
+    if (selector->tail()) {
+      debug_ast(selector->tail(), ind + "{" + del + "}", env);
+    } else if(del != " ") {
+      std::cerr << ind << " |" << del << "| {trailing op}" << std::endl;
+    }
+    ComplexSelectorSet set = selector->sources();
+    // debug_sources_set(set, ind + "  @--> ");
+  } else if (Cast<Compound_Selector>(node)) {
+    Compound_Selector* selector = Cast<Compound_Selector>(node);
+    std::cerr << ind << "Compound_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " [weight:" << longToHex(selector->specificity()) << "]";
+    std::cerr << " [@media:" << selector->media_block() << "]";
+    std::cerr << (selector->extended() ? " [extended]": " -");
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << " <" << prettyprint(selector->pstate().token.ws_before()) << ">" << std::endl;
+    for(const Simple_Selector_Obj& i : selector->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Wrapped_Selector>(node)) {
+    Wrapped_Selector* selector = Cast<Wrapped_Selector>(node);
+    std::cerr << ind << "Wrapped_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+    debug_ast(selector->selector(), ind + " () ", env);
+  } else if (Cast<Pseudo_Selector>(node)) {
+    Pseudo_Selector* selector = Cast<Pseudo_Selector>(node);
+    std::cerr << ind << "Pseudo_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+    debug_ast(selector->expression(), ind + " <= ", env);
+  } else if (Cast<Attribute_Selector>(node)) {
+    Attribute_Selector* selector = Cast<Attribute_Selector>(node);
+    std::cerr << ind << "Attribute_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+    debug_ast(selector->value(), ind + "[" + selector->matcher() + "] ", env);
+  } else if (Cast<Class_Selector>(node)) {
+    Class_Selector* selector = Cast<Class_Selector>(node);
+    std::cerr << ind << "Class_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+  } else if (Cast<Id_Selector>(node)) {
+    Id_Selector* selector = Cast<Id_Selector>(node);
+    std::cerr << ind << "Id_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << std::endl;
+  } else if (Cast<Type_Selector>(node)) {
+    Type_Selector* selector = Cast<Type_Selector>(node);
+    std::cerr << ind << "Type_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <" << selector->hash() << ">";
+    std::cerr << " <<" << selector->ns_name() << ">>";
+    std::cerr << (selector->is_optional() ? " [is_optional]": " -");
+    std::cerr << (selector->has_parent_ref() ? " [has-parent]": " -");
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -");
+    std::cerr << (selector->has_line_feed() ? " [line-feed]": " -");
+    std::cerr << " <" << prettyprint(selector->pstate().token.ws_before()) << ">";
+    std::cerr << std::endl;
+  } else if (Cast<Placeholder_Selector>(node)) {
+
+    Placeholder_Selector* selector = Cast<Placeholder_Selector>(node);
+    std::cerr << ind << "Placeholder_Selector [" << selector->ns_name() << "] " << selector;
+    std::cerr << " (" << pstate_source_position(selector) << ")"
+      << " <" << selector->hash() << ">"
+      << " [@media:" << selector->media_block() << "]"
+      << (selector->is_optional() ? " [is_optional]": " -")
+      << (selector->has_line_break() ? " [line-break]": " -")
+      << (selector->has_line_feed() ? " [line-feed]": " -")
+    << std::endl;
+
+  } else if (Cast<Simple_Selector>(node)) {
+    Simple_Selector* selector = Cast<Simple_Selector>(node);
+    std::cerr << ind << "Simple_Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -") << (selector->has_line_feed() ? " [line-feed]": " -") << std::endl;
+
+  } else if (Cast<Selector_Schema>(node)) {
+    Selector_Schema* selector = Cast<Selector_Schema>(node);
+    std::cerr << ind << "Selector_Schema " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+      << " [@media:" << selector->media_block() << "]"
+      << (selector->connect_parent() ? " [connect-parent]": " -")
+    << std::endl;
+
+    debug_ast(selector->contents(), ind + " ");
+    // for(auto i : selector->elements()) { debug_ast(i, ind + " ", env); }
+
+  } else if (Cast<Selector>(node)) {
+    Selector* selector = Cast<Selector>(node);
+    std::cerr << ind << "Selector " << selector;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << (selector->has_line_break() ? " [line-break]": " -")
+      << (selector->has_line_feed() ? " [line-feed]": " -")
+    << std::endl;
+
+  } else if (Cast<Media_Query_Expression>(node)) {
+    Media_Query_Expression* block = Cast<Media_Query_Expression>(node);
+    std::cerr << ind << "Media_Query_Expression " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << (block->is_interpolated() ? " [is_interpolated]": " -")
+    << std::endl;
+    debug_ast(block->feature(), ind + " feature) ");
+    debug_ast(block->value(), ind + " value) ");
+
+  } else if (Cast<Media_Query>(node)) {
+    Media_Query* block = Cast<Media_Query>(node);
+    std::cerr << ind << "Media_Query " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << (block->is_negated() ? " [is_negated]": " -")
+      << (block->is_restricted() ? " [is_restricted]": " -")
+    << std::endl;
+    debug_ast(block->media_type(), ind + " ");
+    for(const auto& i : block->elements()) { debug_ast(i, ind + " ", env); }
+
+  } else if (Cast<Media_Block>(node)) {
+    Media_Block* block = Cast<Media_Block>(node);
+    std::cerr << ind << "Media_Block " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->media_queries(), ind + " =@ ");
+    if (block->block()) for(const Statement_Obj& i : block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Supports_Block>(node)) {
+    Supports_Block* block = Cast<Supports_Block>(node);
+    std::cerr << ind << "Supports_Block " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->condition(), ind + " =@ ");
+    debug_ast(block->block(), ind + " <>");
+  } else if (Cast<Supports_Operator>(node)) {
+    Supports_Operator* block = Cast<Supports_Operator>(node);
+    std::cerr << ind << "Supports_Operator " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+    << std::endl;
+    debug_ast(block->left(), ind + " left) ");
+    debug_ast(block->right(), ind + " right) ");
+  } else if (Cast<Supports_Negation>(node)) {
+    Supports_Negation* block = Cast<Supports_Negation>(node);
+    std::cerr << ind << "Supports_Negation " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+    << std::endl;
+    debug_ast(block->condition(), ind + " condition) ");
+  } else if (Cast<At_Root_Query>(node)) {
+    At_Root_Query* block = Cast<At_Root_Query>(node);
+    std::cerr << ind << "At_Root_Query " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+    << std::endl;
+    debug_ast(block->feature(), ind + " feature) ");
+    debug_ast(block->value(), ind + " value) ");
+  } else if (Cast<Supports_Declaration>(node)) {
+    Supports_Declaration* block = Cast<Supports_Declaration>(node);
+    std::cerr << ind << "Supports_Declaration " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")"
+    << std::endl;
+    debug_ast(block->feature(), ind + " feature) ");
+    debug_ast(block->value(), ind + " value) ");
+  } else if (Cast<Block>(node)) {
+    Block* root_block = Cast<Block>(node);
+    std::cerr << ind << "Block " << root_block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    if (root_block->is_root()) std::cerr << " [root]";
+    std::cerr << " " << root_block->tabs() << std::endl;
+    for(const Statement_Obj& i : root_block->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Warning>(node)) {
+    Warning* block = Cast<Warning>(node);
+    std::cerr << ind << "Warning " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->message(), ind + " : ");
+  } else if (Cast<Error>(node)) {
+    Error* block = Cast<Error>(node);
+    std::cerr << ind << "Error " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+  } else if (Cast<Debug>(node)) {
+    Debug* block = Cast<Debug>(node);
+    std::cerr << ind << "Debug " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->value(), ind + " ");
+  } else if (Cast<Comment>(node)) {
+    Comment* block = Cast<Comment>(node);
+    std::cerr << ind << "Comment " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() <<
+      " <" << prettyprint(block->pstate().token.ws_before()) << ">" << std::endl;
+    debug_ast(block->text(), ind + "// ", env);
+  } else if (Cast<If>(node)) {
+    If* block = Cast<If>(node);
+    std::cerr << ind << "If " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->predicate(), ind + " = ");
+    debug_ast(block->block(), ind + " <>");
+    debug_ast(block->alternative(), ind + " ><");
+  } else if (Cast<Return>(node)) {
+    Return* block = Cast<Return>(node);
+    std::cerr << ind << "Return " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+  } else if (Cast<Extension>(node)) {
+    Extension* block = Cast<Extension>(node);
+    std::cerr << ind << "Extension " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->selector(), ind + "-> ", env);
+  } else if (Cast<Content>(node)) {
+    Content* block = Cast<Content>(node);
+    std::cerr << ind << "Content " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->arguments(), ind + " args: ", env);
+  } else if (Cast<Import_Stub>(node)) {
+    Import_Stub* block = Cast<Import_Stub>(node);
+    std::cerr << ind << "Import_Stub " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << block->imp_path() << "] ";
+    std::cerr << " " << block->tabs() << std::endl;
+  } else if (Cast<Import>(node)) {
+    Import* block = Cast<Import>(node);
+    std::cerr << ind << "Import " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    // std::vector<std::string>         files_;
+    for (auto imp : block->urls()) debug_ast(imp, ind + "@: ", env);
+    debug_ast(block->import_queries(), ind + "@@ ");
+  } else if (Cast<Assignment>(node)) {
+    Assignment* block = Cast<Assignment>(node);
+    std::cerr << ind << "Assignment " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " <<" << block->variable() << ">> " << block->tabs() << std::endl;
+    debug_ast(block->value(), ind + "=", env);
+  } else if (Cast<Declaration>(node)) {
+    Declaration* block = Cast<Declaration>(node);
+    std::cerr << ind << "Declaration " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [is_custom_property: " << block->is_custom_property() << "] ";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->property(), ind + " prop: ", env);
+    debug_ast(block->value(), ind + " value: ", env);
+    debug_ast(block->block(), ind + " ", env);
+  } else if (Cast<Keyframe_Rule>(node)) {
+    Keyframe_Rule* has_block = Cast<Keyframe_Rule>(node);
+    std::cerr << ind << "Keyframe_Rule " << has_block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << has_block->tabs() << std::endl;
+    if (has_block->name()) debug_ast(has_block->name(), ind + "@");
+    if (has_block->block()) for(const Statement_Obj& i : has_block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Directive>(node)) {
+    Directive* block = Cast<Directive>(node);
+    std::cerr << ind << "Directive " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << block->keyword() << "] " << block->tabs() << std::endl;
+    debug_ast(block->selector(), ind + "~", env);
+    debug_ast(block->value(), ind + "+", env);
+    if (block->block()) for(const Statement_Obj& i : block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Each>(node)) {
+    Each* block = Cast<Each>(node);
+    std::cerr << ind << "Each " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    if (block->block()) for(const Statement_Obj& i : block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<For>(node)) {
+    For* block = Cast<For>(node);
+    std::cerr << ind << "For " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    if (block->block()) for(const Statement_Obj& i : block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<While>(node)) {
+    While* block = Cast<While>(node);
+    std::cerr << ind << "While " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << block->tabs() << std::endl;
+    if (block->block()) for(const Statement_Obj& i : block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Definition>(node)) {
+    Definition* block = Cast<Definition>(node);
+    std::cerr << ind << "Definition " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [name: " << block->name() << "] ";
+    std::cerr << " [type: " << (block->type() == Sass::Definition::Type::MIXIN ? "Mixin " : "Function ") << "] ";
+    // this seems to lead to segfaults some times?
+    // std::cerr << " [signature: " << block->signature() << "] ";
+    std::cerr << " [native: " << block->native_function() << "] ";
+    std::cerr << " " << block->tabs() << std::endl;
+    debug_ast(block->parameters(), ind + " params: ", env);
+    if (block->block()) debug_ast(block->block(), ind + " ", env);
+  } else if (Cast<Mixin_Call>(node)) {
+    Mixin_Call* block = Cast<Mixin_Call>(node);
+    std::cerr << ind << "Mixin_Call " << block << " " << block->tabs();
+    std::cerr << " (" << pstate_source_position(block) << ")";
+    std::cerr << " [" <<  block->name() << "]";
+    std::cerr << " [has_content: " << block->has_content() << "] " << std::endl;
+    debug_ast(block->arguments(), ind + " args: ", env);
+    debug_ast(block->block_parameters(), ind + " block_params: ", env);
+    if (block->block()) debug_ast(block->block(), ind + " ", env);
+  } else if (Ruleset* ruleset = Cast<Ruleset>(node)) {
+    std::cerr << ind << "Ruleset " << ruleset;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [indent: " << ruleset->tabs() << "]";
+    std::cerr << (ruleset->is_invisible() ? " [INVISIBLE]" : "");
+    std::cerr << (ruleset->is_root() ? " [root]" : "");
+    std::cerr << std::endl;
+    debug_ast(ruleset->selector(), ind + ">");
+    debug_ast(ruleset->block(), ind + " ");
+  } else if (Cast<Block>(node)) {
+    Block* block = Cast<Block>(node);
+    std::cerr << ind << "Block " << block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << (block->is_invisible() ? " [INVISIBLE]" : "");
+    std::cerr << " [indent: " << block->tabs() << "]" << std::endl;
+    for(const Statement_Obj& i : block->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Variable>(node)) {
+    Variable* expression = Cast<Variable>(node);
+    std::cerr << ind << "Variable " << expression;
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << expression->name() << "]" << std::endl;
+    std::string name(expression->name());
+    if (env && env->has(name)) debug_ast(Cast<Expression>((*env)[name]), ind + " -> ", env);
+  } else if (Cast<Function_Call>(node)) {
+    Function_Call* expression = Cast<Function_Call>(node);
+    std::cerr << ind << "Function_Call " << expression;
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << expression->name() << "]";
+    if (expression->is_delayed()) std::cerr << " [delayed]";
+    if (expression->is_interpolant()) std::cerr << " [interpolant]";
+    if (expression->is_css()) std::cerr << " [css]";
+    std::cerr << std::endl;
+    debug_ast(expression->arguments(), ind + " args: ", env);
+    debug_ast(expression->func(), ind + " func: ", env);
+  } else if (Cast<Function>(node)) {
+    Function* expression = Cast<Function>(node);
+    std::cerr << ind << "Function " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    if (expression->is_css()) std::cerr << " [css]";
+    std::cerr << std::endl;
+    debug_ast(expression->definition(), ind + " definition: ", env);
+  } else if (Cast<Arguments>(node)) {
+    Arguments* expression = Cast<Arguments>(node);
+    std::cerr << ind << "Arguments " << expression;
+    if (expression->is_delayed()) std::cerr << " [delayed]";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    if (expression->has_named_arguments()) std::cerr << " [has_named_arguments]";
+    if (expression->has_rest_argument()) std::cerr << " [has_rest_argument]";
+    if (expression->has_keyword_argument()) std::cerr << " [has_keyword_argument]";
+    std::cerr << std::endl;
+    for(const Argument_Obj& i : expression->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Argument>(node)) {
+    Argument* expression = Cast<Argument>(node);
+    std::cerr << ind << "Argument " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << expression->value().ptr() << "]";
+    std::cerr << " [name: " << expression->name() << "] ";
+    std::cerr << " [rest: " << expression->is_rest_argument() << "] ";
+    std::cerr << " [keyword: " << expression->is_keyword_argument() << "] " << std::endl;
+    debug_ast(expression->value(), ind + " value: ", env);
+  } else if (Cast<Parameters>(node)) {
+    Parameters* expression = Cast<Parameters>(node);
+    std::cerr << ind << "Parameters " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [has_optional: " << expression->has_optional_parameters() << "] ";
+    std::cerr << " [has_rest: " << expression->has_rest_parameter() << "] ";
+    std::cerr << std::endl;
+    for(const Parameter_Obj& i : expression->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Parameter>(node)) {
+    Parameter* expression = Cast<Parameter>(node);
+    std::cerr << ind << "Parameter " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [name: " << expression->name() << "] ";
+    std::cerr << " [default: " << expression->default_value().ptr() << "] ";
+    std::cerr << " [rest: " << expression->is_rest_parameter() << "] " << std::endl;
+  } else if (Cast<Unary_Expression>(node)) {
+    Unary_Expression* expression = Cast<Unary_Expression>(node);
+    std::cerr << ind << "Unary_Expression " << expression;
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " [delayed: " << expression->is_delayed() << "] ";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << expression->type() << "]" << std::endl;
+    debug_ast(expression->operand(), ind + " operand: ", env);
+  } else if (Cast<Binary_Expression>(node)) {
+    Binary_Expression* expression = Cast<Binary_Expression>(node);
+    std::cerr << ind << "Binary_Expression " << expression;
+    if (expression->is_interpolant()) std::cerr << " [is interpolant] ";
+    if (expression->is_left_interpolant()) std::cerr << " [left interpolant] ";
+    if (expression->is_right_interpolant()) std::cerr << " [right interpolant] ";
+    std::cerr << " [delayed: " << expression->is_delayed() << "] ";
+    std::cerr << " [ws_before: " << expression->op().ws_before << "] ";
+    std::cerr << " [ws_after: " << expression->op().ws_after << "] ";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << expression->type_name() << "]" << std::endl;
+    debug_ast(expression->left(), ind + " left:  ", env);
+    debug_ast(expression->right(), ind + " right: ", env);
+  } else if (Cast<Map>(node)) {
+    Map* expression = Cast<Map>(node);
+    std::cerr << ind << "Map " << expression;
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [Hashed]" << std::endl;
+    for (const auto& i : expression->elements()) {
+      debug_ast(i.first, ind + " key: ");
+      debug_ast(i.second, ind + " val: ");
+    }
+  } else if (Cast<List>(node)) {
+    List* expression = Cast<List>(node);
+    std::cerr << ind << "List " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " (" << expression->length() << ") " <<
+      (expression->separator() == SASS_COMMA ? "Comma " : expression->separator() == SASS_HASH ? "Map " : "Space ") <<
+      " [delayed: " << expression->is_delayed() << "] " <<
+      " [interpolant: " << expression->is_interpolant() << "] " <<
+      " [listized: " << expression->from_selector() << "] " <<
+      " [arglist: " << expression->is_arglist() << "] " <<
+      " [bracketed: " << expression->is_bracketed() << "] " <<
+      " [expanded: " << expression->is_expanded() << "] " <<
+      " [hash: " << expression->hash() << "] " <<
+      std::endl;
+    for(const auto& i : expression->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Boolean>(node)) {
+    Boolean* expression = Cast<Boolean>(node);
+    std::cerr << ind << "Boolean " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " [" << expression->value() << "]" << std::endl;
+  } else if (Cast<Color_RGBA>(node)) {
+    Color_RGBA* expression = Cast<Color_RGBA>(node);
+    std::cerr << ind << "Color " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [name: " << expression->disp() << "] ";
+    std::cerr << " [delayed: " << expression->is_delayed() << "] ";
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " rgba[" << expression->r() << ":"  << expression->g() << ":" << expression->b() << "@" << expression->a() << "]" << std::endl;
+  } else if (Cast<Color_HSLA>(node)) {
+    Color_HSLA* expression = Cast<Color_HSLA>(node);
+    std::cerr << ind << "Color " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [name: " << expression->disp() << "] ";
+    std::cerr << " [delayed: " << expression->is_delayed() << "] ";
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " hsla[" << expression->h() << ":"  << expression->s() << ":" << expression->l() << "@" << expression->a() << "]" << std::endl;
+  } else if (Cast<Number>(node)) {
+    Number* expression = Cast<Number>(node);
+    std::cerr << ind << "Number " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [delayed: " << expression->is_delayed() << "] ";
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] ";
+    std::cerr << " [" << expression->value() << expression->unit() << "]" <<
+      " [hash: " << expression->hash() << "] " <<
+      std::endl;
+  } else if (Cast<Null>(node)) {
+    Null* expression = Cast<Null>(node);
+    std::cerr << ind << "Null " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [interpolant: " << expression->is_interpolant() << "] "
+      // " [hash: " << expression->hash() << "] "
+      << std::endl;
+  } else if (Cast<String_Quoted>(node)) {
+    String_Quoted* expression = Cast<String_Quoted>(node);
+    std::cerr << ind << "String_Quoted " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << prettyprint(expression->value()) << "]";
+    if (expression->is_delayed()) std::cerr << " [delayed]";
+    if (expression->is_interpolant()) std::cerr << " [interpolant]";
+    if (expression->quote_mark()) std::cerr << " [quote_mark: " << expression->quote_mark() << "]";
+    std::cerr << " <" << prettyprint(expression->pstate().token.ws_before()) << ">" << std::endl;
+  } else if (Cast<String_Constant>(node)) {
+    String_Constant* expression = Cast<String_Constant>(node);
+    std::cerr << ind << "String_Constant " << expression;
+    if (expression->concrete_type()) {
+      std::cerr << " " << expression->concrete_type();
+    }
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " [" << prettyprint(expression->value()) << "]";
+    if (expression->is_delayed()) std::cerr << " [delayed]";
+    if (expression->is_interpolant()) std::cerr << " [interpolant]";
+    std::cerr << " <" << prettyprint(expression->pstate().token.ws_before()) << ">" << std::endl;
+  } else if (Cast<String_Schema>(node)) {
+    String_Schema* expression = Cast<String_Schema>(node);
+    std::cerr << ind << "String_Schema " << expression;
+    std::cerr << " (" << pstate_source_position(expression) << ")";
+    std::cerr << " " << expression->concrete_type();
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    if (expression->css()) std::cerr << " [css]";
+    if (expression->is_delayed()) std::cerr << " [delayed]";
+    if (expression->is_interpolant()) std::cerr << " [is interpolant]";
+    if (expression->has_interpolant()) std::cerr << " [has interpolant]";
+    if (expression->is_left_interpolant()) std::cerr << " [left interpolant] ";
+    if (expression->is_right_interpolant()) std::cerr << " [right interpolant] ";
+    std::cerr << " <" << prettyprint(expression->pstate().token.ws_before()) << ">" << std::endl;
+    for(const auto& i : expression->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<String>(node)) {
+    String* expression = Cast<String>(node);
+    std::cerr << ind << "String " << expression;
+    std::cerr << " " << expression->concrete_type();
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    if (expression->is_interpolant()) std::cerr << " [interpolant]";
+    std::cerr << " <" << prettyprint(expression->pstate().token.ws_before()) << ">" << std::endl;
+  } else if (Cast<Expression>(node)) {
+    Expression* expression = Cast<Expression>(node);
+    std::cerr << ind << "Expression " << expression;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    switch (expression->concrete_type()) {
+      case Expression::Type::NONE: std::cerr << " [NONE]"; break;
+      case Expression::Type::BOOLEAN: std::cerr << " [BOOLEAN]"; break;
+      case Expression::Type::NUMBER: std::cerr << " [NUMBER]"; break;
+      case Expression::Type::COLOR: std::cerr << " [COLOR]"; break;
+      case Expression::Type::STRING: std::cerr << " [STRING]"; break;
+      case Expression::Type::LIST: std::cerr << " [LIST]"; break;
+      case Expression::Type::MAP: std::cerr << " [MAP]"; break;
+      case Expression::Type::SELECTOR: std::cerr << " [SELECTOR]"; break;
+      case Expression::Type::NULL_VAL: std::cerr << " [NULL_VAL]"; break;
+      case Expression::Type::C_WARNING: std::cerr << " [C_WARNING]"; break;
+      case Expression::Type::C_ERROR: std::cerr << " [C_ERROR]"; break;
+      case Expression::Type::FUNCTION: std::cerr << " [FUNCTION]"; break;
+      case Expression::Type::NUM_TYPES: std::cerr << " [NUM_TYPES]"; break;
+      case Expression::Type::VARIABLE: std::cerr << " [VARIABLE]"; break;
+      case Expression::Type::FUNCTION_VAL: std::cerr << " [FUNCTION_VAL]"; break;
+      case Expression::Type::PARENT: std::cerr << " [PARENT]"; break;
+    }
+    std::cerr << std::endl;
+  } else if (Cast<Has_Block>(node)) {
+    Has_Block* has_block = Cast<Has_Block>(node);
+    std::cerr << ind << "Has_Block " << has_block;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << has_block->tabs() << std::endl;
+    if (has_block->block()) for(const Statement_Obj& i : has_block->block()->elements()) { debug_ast(i, ind + " ", env); }
+  } else if (Cast<Statement>(node)) {
+    Statement* statement = Cast<Statement>(node);
+    std::cerr << ind << "Statement " << statement;
+    std::cerr << " (" << pstate_source_position(node) << ")";
+    std::cerr << " " << statement->tabs() << std::endl;
+  }
+
+  if (ind == "") std::cerr << "####################################################################\n";
+}
+
+inline void debug_node(Node* node, std::string ind = "")
+{
+  if (ind == "") std::cerr << "#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\n";
+  if (node->isCombinator()) {
+    std::cerr << ind;
+    std::cerr << "Combinator ";
+    std::cerr << node << " ";
+    if (node->got_line_feed) std::cerr << "[LF] ";
+    switch (node->combinator()) {
+      case Complex_Selector::ADJACENT_TO: std::cerr << "{+} "; break;
+      case Complex_Selector::PARENT_OF:   std::cerr << "{>} "; break;
+      case Complex_Selector::PRECEDES:    std::cerr << "{~} "; break;
+      case Complex_Selector::REFERENCE:   std::cerr << "{@} "; break;
+      case Complex_Selector::ANCESTOR_OF: std::cerr << "{ } "; break;
+    }
+    std::cerr << std::endl;
+    // debug_ast(node->combinator(), ind + "  ");
+  } else if (node->isSelector()) {
+    std::cerr << ind;
+    std::cerr << "Selector ";
+    std::cerr << node << " ";
+    if (node->got_line_feed) std::cerr << "[LF] ";
+    std::cerr << std::endl;
+    debug_ast(node->selector(), ind + "  ");
+  } else if (node->isCollection()) {
+    std::cerr << ind;
+    std::cerr << "Collection ";
+    std::cerr << node << " ";
+    if (node->got_line_feed) std::cerr << "[LF] ";
+    std::cerr << std::endl;
+    for(auto n : (*node->collection())) {
+      debug_node(&n, ind + "  ");
+    }
+  } else if (node->isNil()) {
+    std::cerr << ind;
+    std::cerr << "Nil ";
+    std::cerr << node << " ";
+    if (node->got_line_feed) std::cerr << "[LF] ";
+    std::cerr << std::endl;
+  } else {
+    std::cerr << ind;
+    std::cerr << "OTHER ";
+    std::cerr << node << " ";
+    if (node->got_line_feed) std::cerr << "[LF] ";
+    std::cerr << std::endl;
+  }
+  if (ind == "") std::cerr << "#@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@\n";
+}
+
+/*
+inline void debug_ast(const AST_Node* node, std::string ind = "", Env* env = 0)
+{
+  debug_ast(const_cast<AST_Node*>(node), ind, env);
+}
+*/
+inline void debug_node(const Node* node, std::string ind = "")
+{
+  debug_node(const_cast<Node*>(node), ind);
+}
+
+inline void debug_subset_map(Sass::Subset_Map& map, std::string ind = "")
+{
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+  for(auto const &it : map.values()) {
+    debug_ast(it.first, ind + "first: ");
+    debug_ast(it.second, ind + "second: ");
+  }
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+}
+
+inline void debug_subset_entries(SubSetMapPairs* entries, std::string ind = "")
+{
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+  for(auto const &pair : *entries) {
+    debug_ast(pair.first, ind + "first: ");
+    debug_ast(pair.second, ind + "second: ");
+  }
+  if (ind == "") std::cerr << "#%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%\n";
+}
+
+#endif // SASS_DEBUGGER