radiant 1.0.0.rc1 → 1.0.0.rc2

data/vendor/plugins/haml/test/haml/util_test.rb

@@ -1,268 +0,0 @@
-#!/usr/bin/env ruby
-require File.dirname(__FILE__) + '/../test_helper'
-require 'pathname'
-
-class UtilTest < Test::Unit::TestCase
-  include Haml::Util
-
-  def test_scope
-    assert(File.exist?(scope("Rakefile")))
-  end
-
-  def test_to_hash
-    assert_equal({
-        :foo => 1,
-        :bar => 2,
-        :baz => 3
-      }, to_hash([[:foo, 1], [:bar, 2], [:baz, 3]]))
-  end
-
-  def test_map_keys
-    assert_equal({
-        "foo" => 1,
-        "bar" => 2,
-        "baz" => 3
-      }, map_keys({:foo => 1, :bar => 2, :baz => 3}) {|k| k.to_s})
-  end
-
-  def test_map_vals
-    assert_equal({
-        :foo => "1",
-        :bar => "2",
-        :baz => "3"
-      }, map_vals({:foo => 1, :bar => 2, :baz => 3}) {|k| k.to_s})
-  end
-
-  def test_map_hash
-    assert_equal({
-        "foo" => "1",
-        "bar" => "2",
-        "baz" => "3"
-      }, map_hash({:foo => 1, :bar => 2, :baz => 3}) {|k, v| [k.to_s, v.to_s]})
-  end
-
-  def test_powerset
-    return unless Set[Set[]] == Set[Set[]] # There's a bug in Ruby 1.8.6 that breaks nested set equality
-    assert_equal([[].to_set].to_set,
-      powerset([]))
-    assert_equal([[].to_set, [1].to_set].to_set,
-      powerset([1]))
-    assert_equal([[].to_set, [1].to_set, [2].to_set, [1, 2].to_set].to_set,
-      powerset([1, 2]))
-    assert_equal([[].to_set, [1].to_set, [2].to_set, [3].to_set,
-        [1, 2].to_set, [2, 3].to_set, [1, 3].to_set, [1, 2, 3].to_set].to_set,
-      powerset([1, 2, 3]))
-  end
-
-  def test_restrict
-    assert_equal(0.5, restrict(0.5, 0..1))
-    assert_equal(1, restrict(2, 0..1))
-    assert_equal(1.3, restrict(2, 0..1.3))
-    assert_equal(0, restrict(-1, 0..1))
-  end
-
-  def test_merge_adjacent_strings
-    assert_equal(["foo bar baz", :bang, "biz bop", 12],
-      merge_adjacent_strings(["foo ", "bar ", "baz", :bang, "biz", " bop", 12]))
-    str = "foo"
-    assert_equal(["foo foo foo", :bang, "foo foo", 12],
-      merge_adjacent_strings([str, " ", str, " ", str, :bang, str, " ", str, 12]))
-  end
-
-  def test_intersperse
-    assert_equal(["foo", " ", "bar", " ", "baz"],
-      intersperse(%w[foo bar baz], " "))
-    assert_equal([], intersperse([], " "))
-  end
-
-  def test_substitute
-    assert_equal(["foo", "bar", "baz", 3, 4],
-      substitute([1, 2, 3, 4], [1, 2], ["foo", "bar", "baz"]))
-    assert_equal([1, "foo", "bar", "baz", 4],
-      substitute([1, 2, 3, 4], [2, 3], ["foo", "bar", "baz"]))
-    assert_equal([1, 2, "foo", "bar", "baz"],
-      substitute([1, 2, 3, 4], [3, 4], ["foo", "bar", "baz"]))
-
-    assert_equal([1, "foo", "bar", "baz", 2, 3, 4],
-      substitute([1, 2, 2, 2, 3, 4], [2, 2], ["foo", "bar", "baz"]))
-  end
-
-  def test_strip_string_array
-    assert_equal(["foo ", " bar ", " baz"],
-      strip_string_array([" foo ", " bar ", " baz "]))
-    assert_equal([:foo, " bar ", " baz"],
-      strip_string_array([:foo, " bar ", " baz "]))
-    assert_equal(["foo ", " bar ", :baz],
-      strip_string_array([" foo ", " bar ", :baz]))
-  end
-
-  def test_paths
-    assert_equal([[1, 3, 5], [2, 3, 5], [1, 4, 5], [2, 4, 5]],
-      paths([[1, 2], [3, 4], [5]]))
-    assert_equal([[]], paths([]))
-    assert_equal([[1, 2, 3]], paths([[1], [2], [3]]))
-  end
-
-  def test_lcs
-    assert_equal([1, 2, 3], lcs([1, 2, 3], [1, 2, 3]))
-    assert_equal([], lcs([], [1, 2, 3]))
-    assert_equal([], lcs([1, 2, 3], []))
-    assert_equal([1, 2, 3], lcs([5, 1, 4, 2, 3, 17], [0, 0, 1, 2, 6, 3]))
-
-    assert_equal([1], lcs([1, 2, 3, 4], [4, 3, 2, 1]))
-    assert_equal([1, 2], lcs([1, 2, 3, 4], [3, 4, 1, 2]))
-  end
-
-  def test_lcs_with_block
-    assert_equal(["1", "2", "3"],
-      lcs([1, 4, 2, 5, 3], [1, 2, 3]) {|a, b| a == b && a.to_s})
-    assert_equal([-4, 2, 8],
-      lcs([-5, 3, 2, 8], [-4, 1, 8]) {|a, b| (a - b).abs <= 1 && [a, b].max})
-  end
-
-  def test_silence_warnings
-    old_stderr, $stderr = $stderr, StringIO.new
-    warn "Out"
-    assert_equal("Out\n", $stderr.string)
-    silence_warnings {warn "In"}
-    assert_equal("Out\n", $stderr.string)
-  ensure
-    $stderr = old_stderr
-  end
-
-  def test_haml_warn
-    assert_warning("Foo!") {haml_warn "Foo!"}
-  end
-
-  def test_silence_haml_warnings
-    old_stderr, $stderr = $stderr, StringIO.new
-    silence_haml_warnings {warn "Out"}
-    assert_equal("Out\n", $stderr.string)
-    silence_haml_warnings {haml_warn "In"}
-    assert_equal("Out\n", $stderr.string)
-  ensure
-    $stderr = old_stderr
-  end
-
-  def test_has
-    assert(has?(:instance_method, String, :chomp!))
-    assert(has?(:private_instance_method, Haml::Engine, :set_locals))
-  end
-
-  def test_enum_with_index
-    assert_equal(%w[foo0 bar1 baz2],
-      enum_with_index(%w[foo bar baz]).map {|s, i| "#{s}#{i}"})
-  end
-
-  def test_enum_cons
-    assert_equal(%w[foobar barbaz],
-      enum_cons(%w[foo bar baz], 2).map {|s1, s2| "#{s1}#{s2}"})
-  end
-
-  def test_ord
-    assert_equal(102, ord("f"))
-    assert_equal(98, ord("bar"))
-  end
-
-  def test_flatten
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 0))
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 1))
-    assert_equal([1, 2, 3], flatten([1, 2, 3], 2))
-
-    assert_equal([[1, 2], 3], flatten([[1, 2], 3], 0))
-    assert_equal([1, 2, 3], flatten([[1, 2], 3], 1))
-    assert_equal([1, 2, 3], flatten([[1, 2], 3], 2))
-
-    assert_equal([[[1], 2], [3], 4], flatten([[[1], 2], [3], 4], 0))
-    assert_equal([[1], 2, 3, 4], flatten([[[1], 2], [3], 4], 1))
-    assert_equal([1, 2, 3, 4], flatten([[[1], 2], [3], 4], 2))
-  end
-
-  def test_set_hash
-    assert(set_hash(Set[1, 2, 3]) == set_hash(Set[3, 2, 1]))
-    assert(set_hash(Set[1, 2, 3]) == set_hash(Set[1, 2, 3]))
-
-    s1 = Set[]
-    s1 << 1
-    s1 << 2
-    s1 << 3
-    s2 = Set[]
-    s2 << 3
-    s2 << 2
-    s2 << 1
-    assert(set_hash(s1) == set_hash(s2))
-  end
-
-  def test_set_eql
-    assert(set_eql?(Set[1, 2, 3], Set[3, 2, 1]))
-    assert(set_eql?(Set[1, 2, 3], Set[1, 2, 3]))
-
-    s1 = Set[]
-    s1 << 1
-    s1 << 2
-    s1 << 3
-    s2 = Set[]
-    s2 << 3
-    s2 << 2
-    s2 << 1
-    assert(set_eql?(s1, s2))
-  end
-
-  def test_caller_info
-    assert_equal(["/tmp/foo.rb", 12, "fizzle"], caller_info("/tmp/foo.rb:12: in `fizzle'"))
-    assert_equal(["/tmp/foo.rb", 12, nil], caller_info("/tmp/foo.rb:12"))
-    assert_equal(["(haml)", 12, "blah"], caller_info("(haml):12: in `blah'"))
-    assert_equal(["", 12, "boop"], caller_info(":12: in `boop'"))
-    assert_equal(["/tmp/foo.rb", -12, "fizzle"], caller_info("/tmp/foo.rb:-12: in `fizzle'"))
-    assert_equal(["/tmp/foo.rb", 12, "fizzle"], caller_info("/tmp/foo.rb:12: in `fizzle {}'"))
-  end
-
-  def test_version_gt
-    assert_version_gt("2.0.0", "1.0.0")
-    assert_version_gt("1.1.0", "1.0.0")
-    assert_version_gt("1.0.1", "1.0.0")
-    assert_version_gt("1.0.0", "1.0.0.rc")
-    assert_version_gt("1.0.0.1", "1.0.0.rc")
-    assert_version_gt("1.0.0.rc", "0.9.9")
-    assert_version_gt("1.0.0.beta", "1.0.0.alpha")
-
-    assert_version_eq("1.0.0", "1.0.0")
-    assert_version_eq("1.0.0", "1.0.0.0")
-  end
-
-  def assert_version_gt(v1, v2)
-    #assert(version_gt(v1, v2), "Expected #{v1} > #{v2}")
-    assert(!version_gt(v2, v1), "Expected #{v2} < #{v1}")
-  end
-
-  def assert_version_eq(v1, v2)
-    assert(!version_gt(v1, v2), "Expected #{v1} = #{v2}")
-    assert(!version_gt(v2, v1), "Expected #{v2} = #{v1}")
-  end
-
-  def test_def_static_method
-    klass = Class.new
-    def_static_method(klass, :static_method, [:arg1, :arg2],
-      :sarg1, :sarg2, <<RUBY)
-      s = "Always " + arg1
-      s << " <% if sarg1 %>and<% else %>but never<% end %> " << arg2
-
-      <% if sarg2 %>
-        s << "."
-      <% end %>
-RUBY
-    c = klass.new
-    assert_equal("Always brush your teeth and comb your hair.",
-      c.send(static_method_name(:static_method, true, true),
-        "brush your teeth", "comb your hair"))
-    assert_equal("Always brush your teeth and comb your hair",
-      c.send(static_method_name(:static_method, true, false),
-        "brush your teeth", "comb your hair"))
-    assert_equal("Always brush your teeth but never play with fire.",
-      c.send(static_method_name(:static_method, false, true),
-        "brush your teeth", "play with fire"))
-    assert_equal("Always brush your teeth but never play with fire",
-      c.send(static_method_name(:static_method, false, false),
-        "brush your teeth", "play with fire"))
-  end
-end

data/vendor/plugins/haml/test/linked_rails.rb

@@ -1,42 +0,0 @@
-# allows testing with edge Rails by creating a test/rails symlink
-linked_rails = File.dirname(__FILE__) + '/rails'
-
-if File.exists?(linked_rails) && !$:.include?(linked_rails + '/activesupport/lib')
-  puts "[ using linked Rails ]"
-  $:.unshift linked_rails + '/activesupport/lib'
-  $:.unshift linked_rails + '/actionpack/lib'
-  $:.unshift linked_rails + '/railties/lib'
-end
-require 'rubygems'
-require 'action_controller'
-require 'action_view'
-
-begin
-  # Necessary for Rails 3
-  require 'rails'
-rescue LoadError
-  # Necessary for Rails 2.3.7
-  require 'initializer'
-rescue LoadError
-end
-
-if defined?(Rails::Application) # Rails 3
-  class TestApp < Rails::Application
-    config.root = File.join(File.dirname(__FILE__), "../..")
-  end
-  Rails.application = TestApp
-elsif defined?(RAILS_ROOT)
-  RAILS_ROOT.replace(File.join(File.dirname(__FILE__), "../.."))
-else
-  RAILS_ROOT = File.join(File.dirname(__FILE__), "../..")
-end
-
-ActionController::Base.logger = Logger.new(nil)
-
-# Load plugins from test/plugins.
-# This will only work with very basic plugins,
-# since we don't want to load the entirety of Rails.
-Dir[File.dirname(__FILE__) + '/plugins/*'].each do |plugin|
-  $: << plugin + '/lib'
-  eval(File.read(plugin + '/init.rb'))
-end

data/vendor/plugins/haml/test/sass/callbacks_test.rb

@@ -1,61 +0,0 @@
-#!/usr/bin/env ruby
-require File.dirname(__FILE__) + '/../test_helper'
-require 'sass/callbacks'
-
-class CallerBack
-  extend Sass::Callbacks
-  define_callback :foo
-  define_callback :bar
-
-  def do_foo
-    run_foo
-  end
-
-  def do_bar
-    run_bar 12
-  end
-end
-
-module ClassLevelCallerBack
-  extend Sass::Callbacks
-  define_callback :foo
-  extend self
-
-  def do_foo
-    run_foo
-  end
-end
-
-class SassCallbacksTest < Test::Unit::TestCase
-  def test_simple_callback
-    cb = CallerBack.new
-    there = false
-    cb.on_foo {there = true}
-    cb.do_foo
-    assert there, "Expected callback to be called."
-  end
-
-  def test_multiple_callbacks
-    cb = CallerBack.new
-    str = ""
-    cb.on_foo {str += "first"}
-    cb.on_foo {str += " second"}
-    cb.do_foo
-    assert_equal "first second", str
-  end
-
-  def test_callback_with_arg
-    cb = CallerBack.new
-    val = nil
-    cb.on_bar {|a| val = a}
-    cb.do_bar
-    assert_equal 12, val
-  end
-
-  def test_class_level_callback
-    there = false
-    ClassLevelCallerBack.on_foo {there = true}
-    ClassLevelCallerBack.do_foo
-    assert there, "Expected callback to be called."
-  end
-end

data/vendor/plugins/haml/test/sass/conversion_test.rb

@@ -1,1218 +0,0 @@
-#!/usr/bin/env ruby
-require File.dirname(__FILE__) + '/../test_helper'
-
-class ConversionTest < Test::Unit::TestCase
-  def test_basic
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz: bang
-  bip: bop
-SASS
-foo bar {
-  baz: bang;
-  bip: bop; }
-SCSS
-    assert_renders <<SASS, <<SCSS, :old => true
-foo bar
-  :baz bang
-  :bip bop
-SASS
-foo bar {
-  baz: bang;
-  bip: bop; }
-SCSS
-  end
-
-  def test_empty_selector
-    assert_renders "foo bar", "foo bar {}"
-  end
-
-  def test_empty_directive
-    assert_scss_to_sass "@media screen", "@media screen {}"
-    assert_scss_to_scss "@media screen {}"
-  end
-
-  def test_empty_control_directive
-    assert_renders "@if false", "@if false {}"
-  end
-
-  def test_nesting
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz bang
-    baz: bang
-    bip: bop
-  blat: boo
-SASS
-foo bar {
-  baz bang {
-    baz: bang;
-    bip: bop; }
-  blat: boo; }
-SCSS
-  end
-
-  def test_nesting_with_parent_ref
-    assert_renders <<SASS, <<SCSS
-foo bar
-  &:hover
-    baz: bang
-SASS
-foo bar {
-  &:hover {
-    baz: bang; } }
-SCSS
-  end
-
-  def test_selector_interpolation
-    assert_renders <<SASS, <<SCSS
-foo \#{$bar + "baz"}.bip
-  baz: bang
-SASS
-foo \#{$bar + "baz"}.bip {
-  baz: bang; }
-SCSS
-  end
-
-  def test_multiline_selector_with_commas
-    assert_renders <<SASS, <<SCSS
-foo bar,
-baz bang
-  baz: bang
-SASS
-foo bar,
-baz bang {
-  baz: bang; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-blat
-  foo bar,
-  baz bang
-    baz: bang
-SASS
-blat {
-  foo bar,
-  baz bang {
-    baz: bang; } }
-SCSS
-  end
-
-  def test_multiline_selector_without_commas
-    assert_scss_to_sass <<SASS, <<SCSS
-foo bar baz bang
-  baz: bang
-SASS
-foo bar
-baz bang {
-  baz: bang; }
-SCSS
-
-    assert_scss_to_scss <<SCSS
-foo bar
-baz bang {
-  baz: bang; }
-SCSS
-  end
-
-  def test_escaped_selector
-    assert_renders <<SASS, <<SCSS
-foo bar
-  \\:hover
-    baz: bang
-SASS
-foo bar {
-  :hover {
-    baz: bang; } }
-SCSS
-  end
-
-  def test_property_name_interpolation
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz\#{$bang}bip\#{$bop}: 12
-SASS
-foo bar {
-  baz\#{$bang}bip\#{$bop}: 12; }
-SCSS
-  end
-
-  def test_property_name_interpolation
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz\#{$bang}bip\#{$bop}: 12
-SASS
-foo bar {
-  baz\#{$bang}bip\#{$bop}: 12; }
-SCSS
-  end
-
-  def test_property_value_interpolation
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz: 12 \#{$bang} bip \#{"bop"} blat
-SASS
-foo bar {
-  baz: 12 \#{$bang} bip \#{"bop"} blat; }
-SCSS
-  end
-
-  def test_dynamic_properties
-    assert_renders <<SASS, <<SCSS
-foo bar
-  baz: 12 $bang "bip"
-SASS
-foo bar {
-  baz: 12 $bang "bip"; }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-foo bar {
-  baz: 12 $bang bip; }
-SCSS
-foo bar
-  baz= 12 $bang "bip"
-SASS
-  end
-
-  def test_dynamic_properties_with_old
-    assert_renders <<SASS, <<SCSS, :old => true
-foo bar
-  :baz 12 $bang "bip"
-SASS
-foo bar {
-  baz: 12 $bang "bip"; }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS, :old => true
-foo bar {
-  baz: 12 $bang bip; }
-SCSS
-foo bar
-  :baz= 12 $bang "bip"
-SASS
-  end
-
-  def test_multiline_properties
-    assert_scss_to_sass <<SASS, <<SCSS
-foo bar
-  baz: bip   bam         boon
-SASS
-foo bar {
-  baz:
-    bip
-  bam
-        boon; }
-SCSS
-
-    assert_scss_to_scss <<OUT, <<IN
-foo bar {
-  baz: bip   bam         boon; }
-OUT
-foo bar {
-  baz:
-    bip
-  bam
-        boon; }
-IN
-  end
-
-  def test_multiline_dynamic_properties
-    assert_scss_to_sass <<SASS, <<SCSS
-foo bar
-  baz: $bip "bam" 12px
-SASS
-foo bar {
-  baz:
-    $bip
-  "bam"
-        12px; }
-SCSS
-
-    assert_scss_to_scss <<OUT, <<IN
-foo bar {
-  baz: $bip "bam" 12px; }
-OUT
-foo bar {
-  baz:
-    $bip
-  "bam"
-        12px; }
-IN
-  end
-
-  def test_silent_comments
-    assert_renders <<SASS, <<SCSS
-// foo
-
-// bar
-
-// baz
-
-foo bar
-  a: b
-SASS
-// foo
-
-// bar
-
-// baz
-
-foo bar {
-  a: b; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-// foo
-// bar
-//   baz
-// bang
-
-foo bar
-  a: b
-SASS
-// foo
-// bar
-//   baz
-// bang
-
-foo bar {
-  a: b; }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-// foo
-// bar
-//   baz
-// bang
-
-foo bar {
-  a: b; }
-SCSS
-// foo
-// bar
-//   baz
-// bang
-
-foo bar
-  a: b
-SASS
-  end
-
-  def test_nested_silent_comments
-    assert_renders <<SASS, <<SCSS
-foo
-  bar: baz
-  // bip bop
-  // beep boop
-  bang: bizz
-  // bubble bubble
-  // toil trouble
-SASS
-foo {
-  bar: baz;
-  // bip bop
-  // beep boop
-  bang: bizz;
-  // bubble bubble
-  // toil trouble
-}
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  bar: baz;
-  // bip bop
-  // beep boop
-  //   bap blimp
-  bang: bizz;
-  // bubble bubble
-  // toil trouble
-  //    gorp
-}
-SCSS
-foo
-  bar: baz
-  // bip bop
-     beep boop
-       bap blimp
-  bang: bizz
-  // bubble bubble
-    toil trouble
-       gorp
-SASS
-  end
-
-  def test_loud_comments
-    assert_renders <<SASS, <<SCSS
-/* foo
-
-/* bar
-
-/* baz
-
-foo bar
-  a: b
-SASS
-/* foo */
-
-/* bar */
-
-/* baz */
-
-foo bar {
-  a: b; }
-SCSS
-
-    assert_scss_to_sass <<SASS, <<SCSS
-/* foo
- * bar
- *   baz
- * bang
-
-foo bar
-  a: b
-SASS
-/* foo
-   bar
-     baz
-   bang */
-
-foo bar {
-  a: b; }
-SCSS
-
-    assert_scss_to_scss <<SCSS
-/* foo
-   bar
-     baz
-   bang */
-
-foo bar {
-  a: b; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-/* foo
- * bar
- *   baz
- * bang
-
-foo bar
-  a: b
-SASS
-/* foo
- * bar
- *   baz
- * bang */
-
-foo bar {
-  a: b; }
-SCSS
-  end
-
-  def test_nested_loud_comments
-    assert_renders <<SASS, <<SCSS
-foo
-  bar: baz
-  /* bip bop
-   * beep boop
-  bang: bizz
-  /* bubble bubble
-   * toil trouble
-SASS
-foo {
-  bar: baz;
-  /* bip bop
-   * beep boop */
-  bang: bizz;
-  /* bubble bubble
-   * toil trouble */ }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  bar: baz;
-  /* bip bop
-   * beep boop
-   *   bap blimp */
-  bang: bizz;
-  /* bubble bubble
-   * toil trouble
-   *    gorp */ }
-SCSS
-foo
-  bar: baz
-  /* bip bop
-     beep boop
-       bap blimp
-  bang: bizz
-  /* bubble bubble
-    toil trouble
-       gorp
-SASS
-  end
-
-  def test_loud_comments_with_weird_indentation
-    assert_scss_to_sass <<SASS, <<SCSS
-foo
-  /*      foo
-   * bar
-   *     baz
-  a: b
-SASS
-foo {
-  /* foo
-bar
-    baz */
-  a: b; }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  /*      foo
-   * bar
-   *     baz */
-  a: b; }
-SCSS
-foo
-  /*      foo
-     bar
-         baz
-  a: b
-SASS
-  end
-
-  def test_immediately_preceding_comments
-    assert_renders <<SASS, <<SCSS
-/* Foo
- * Bar
- * Baz
-.foo#bar
-  a: b
-SASS
-/* Foo
- * Bar
- * Baz */
-.foo#bar {
-  a: b; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-// Foo
-// Bar
-// Baz
-=foo
-  a: b
-SASS
-// Foo
-// Bar
-// Baz
-@mixin foo {
-  a: b; }
-SCSS
-  end
-
-  def test_debug
-    assert_renders <<SASS, <<SCSS
-foo
-  @debug 12px
-  bar: baz
-SASS
-foo {
-  @debug 12px;
-  bar: baz; }
-SCSS
-  end
-
-  def test_directive_without_children
-    assert_renders <<SASS, <<SCSS
-foo
-  @foo #bar "baz"
-  bar: baz
-SASS
-foo {
-  @foo #bar "baz";
-  bar: baz; }
-SCSS
-  end
-
-  def test_directive_with_prop_children
-    assert_renders <<SASS, <<SCSS
-foo
-  @foo #bar "baz"
-    a: b
-    c: d
-
-  bar: baz
-SASS
-foo {
-  @foo #bar "baz" {
-    a: b;
-    c: d; }
-
-  bar: baz; }
-SCSS
-  end
-
-  def test_directive_with_rule_children
-    assert_renders <<SASS, <<SCSS
-foo
-  @foo #bar "baz"
-    #blat
-      a: b
-    .bang
-      c: d
-      e: f
-
-  bar: baz
-SASS
-foo {
-  @foo #bar "baz" {
-    #blat {
-      a: b; }
-    .bang {
-      c: d;
-      e: f; } }
-
-  bar: baz; }
-SCSS
-  end
-
-  def test_directive_with_rule_and_prop_children
-    assert_renders <<SASS, <<SCSS
-foo
-  @foo #bar "baz"
-    g: h
-    #blat
-      a: b
-    .bang
-      c: d
-      e: f
-    i: j
-
-  bar: baz
-SASS
-foo {
-  @foo #bar "baz" {
-    g: h;
-    #blat {
-      a: b; }
-    .bang {
-      c: d;
-      e: f; }
-    i: j; }
-
-  bar: baz; }
-SCSS
-  end
-
-  def test_charset
-    assert_renders <<SASS, <<SCSS
-@charset "utf-8"
-SASS
-@charset "utf-8";
-SCSS
-  end
-
-  def test_for
-    assert_renders <<SASS, <<SCSS
-foo
-  @for $a from $b to $c
-    a: b
-  @for $c from 1 to 16
-    d: e
-    f: g
-SASS
-foo {
-  @for $a from $b to $c {
-    a: b; }
-  @for $c from 1 to 16 {
-    d: e;
-    f: g; } }
-SCSS
-  end
-
-  def test_while
-    assert_renders <<SASS, <<SCSS
-foo
-  @while flaz($a + $b)
-    a: b
-  @while 1
-    d: e
-    f: g
-SASS
-foo {
-  @while flaz($a + $b) {
-    a: b; }
-  @while 1 {
-    d: e;
-    f: g; } }
-SCSS
-  end
-
-  def test_if
-    assert_renders <<SASS, <<SCSS
-foo
-  @if $foo or $bar
-    a: b
-  @if $baz
-    d: e
-  @else if $bang
-    f: g
-  @else
-    h: i
-SASS
-foo {
-  @if $foo or $bar {
-    a: b; }
-  @if $baz {
-    d: e; }
-  @else if $bang {
-    f: g; }
-  @else {
-    h: i; } }
-SCSS
-  end
-
-  def test_import
-    assert_renders <<SASS, <<SCSS
-@import foo
-
-@import url(bar.css)
-
-foo
-  bar: baz
-SASS
-@import "foo";
-
-@import url(bar.css);
-
-foo {
-  bar: baz; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-@import foo.css
-
-@import url(bar.css)
-
-foo
-  bar: baz
-SASS
-@import "foo.css";
-
-@import url(bar.css);
-
-foo {
-  bar: baz; }
-SCSS
-  end
-
-  def test_import_as_directive_in_sass
-    assert_equal "@import foo.css\n", to_sass('@import "foo.css"')
-  end
-
-  def test_import_as_directive_in_scss
-    assert_renders <<SASS, <<SCSS
-@import "foo.css" print
-SASS
-@import "foo.css" print;
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-@import url(foo.css) screen, print
-SASS
-@import url(foo.css) screen, print;
-SCSS
-  end
-
-  def test_adjacent_imports
-    assert_renders <<SASS, <<SCSS
-@import foo.sass
-@import bar.scss
-@import baz
-SASS
-@import "foo.sass";
-@import "bar.scss";
-@import "baz";
-SCSS
-  end
-
-  def test_non_adjacent_imports
-    assert_renders <<SASS, <<SCSS
-@import foo.sass
-
-@import bar.scss
-
-@import baz
-SASS
-@import "foo.sass";
-
-@import "bar.scss";
-
-@import "baz";
-SCSS
-  end
-
-  def test_extend
-    assert_renders <<SASS, <<SCSS
-.foo
-  @extend .bar
-  @extend .baz:bang
-SASS
-.foo {
-  @extend .bar;
-  @extend .baz:bang; }
-SCSS
-  end
-
-  def test_argless_mixin_definition
-    assert_renders <<SASS, <<SCSS
-=foo-bar
-  baz
-    a: b
-SASS
-@mixin foo-bar {
-  baz {
-    a: b; } }
-SCSS
-
-    assert_scss_to_sass <<SASS, <<SCSS
-=foo-bar
-  baz
-    a: b
-SASS
-@mixin foo-bar() {
-  baz {
-    a: b; } }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-@mixin foo-bar {
-  baz {
-    a: b; } }
-SCSS
-=foo-bar()
-  baz
-    a: b
-SASS
-  end
-
-  def test_mixin_definition_without_defaults
-    assert_renders <<SASS, <<SCSS
-=foo-bar($baz, $bang)
-  baz
-    a: $baz $bang
-SASS
-@mixin foo-bar($baz, $bang) {
-  baz {
-    a: $baz $bang; } }
-SCSS
-  end
-
-  def test_mixin_definition_with_defaults
-    assert_renders <<SASS, <<SCSS
-=foo-bar($baz, $bang: 12px)
-  baz
-    a: $baz $bang
-SASS
-@mixin foo-bar($baz, $bang: 12px) {
-  baz {
-    a: $baz $bang; } }
-SCSS
-
-    assert_scss_to_sass <<SASS, <<SCSS
-=foo-bar($baz, $bang: foo)
-  baz
-    a: $baz $bang
-SASS
-@mixin foo-bar($baz, $bang = "foo") {
-  baz {
-    a: $baz $bang; } }
-SCSS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-@mixin foo-bar($baz, $bang: foo) {
-  baz {
-    a: $baz $bang; } }
-SCSS
-=foo-bar($baz, $bang = "foo")
-  baz
-    a: $baz $bang
-SASS
-  end
-
-  def test_argless_mixin_include
-    assert_renders <<SASS, <<SCSS
-foo
-  +foo-bar
-  a: blip
-SASS
-foo {
-  @include foo-bar;
-  a: blip; }
-SCSS
-  end
-
-  def test_mixin_include
-    assert_renders <<SASS, <<SCSS
-foo
-  +foo-bar(12px, "blaz")
-  a: blip
-SASS
-foo {
-  @include foo-bar(12px, "blaz");
-  a: blip; }
-SCSS
-  end
-
-  def test_variable_definition
-    assert_renders <<SASS, <<SCSS
-$var1: 12px + 15px
-
-foo
-  $var2: flaz(#abcdef)
-  val: $var1 $var2
-SASS
-$var1: 12px + 15px;
-
-foo {
-  $var2: flaz(#abcdef);
-  val: $var1 $var2; }
-SCSS
-
-    assert_sass_to_scss '$var: 12px $bar baz;', '$var = 12px $bar "baz"'
-  end
-
-  def test_guarded_variable_definition
-    assert_renders <<SASS, <<SCSS
-$var1: 12px + 15px !default
-
-foo
-  $var2: flaz(#abcdef) !default
-  val: $var1 $var2
-SASS
-$var1: 12px + 15px !default;
-
-foo {
-  $var2: flaz(#abcdef) !default;
-  val: $var1 $var2; }
-SCSS
-
-    assert_sass_to_scss '$var: 12px $bar baz !default;', '$var ||= 12px $bar "baz"'
-  end
-
-  def test_multiple_variable_definitions
-    assert_renders <<SASS, <<SCSS
-$var1: foo
-$var2: bar
-$var3: baz
-
-$var4: bip
-$var5: bap
-SASS
-$var1: foo;
-$var2: bar;
-$var3: baz;
-
-$var4: bip;
-$var5: bap;
-SCSS
-  end
-
-  def test_division_asserted_with_parens
-    assert_renders <<SASS, <<SCSS
-foo
-  a: (1px / 2px)
-SASS
-foo {
-  a: (1px / 2px); }
-SCSS
-  end
-
-  def test_division_not_asserted_when_unnecessary
-    assert_renders <<SASS, <<SCSS
-$var: 1px / 2px
-
-foo
-  a: $var
-SASS
-$var: 1px / 2px;
-
-foo {
-  a: $var; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-$var: 1px
-
-foo
-  a: $var / 2px
-SASS
-$var: 1px;
-
-foo {
-  a: $var / 2px; }
-SCSS
-
-    assert_renders <<SASS, <<SCSS
-foo
-  a: 1 + 1px / 2px
-SASS
-foo {
-  a: 1 + 1px / 2px; }
-SCSS
-  end
-
-  def test_literal_slash
-    assert_renders <<SASS, <<SCSS
-foo
-  a: 1px / 2px
-SASS
-foo {
-  a: 1px / 2px; }
-SCSS
-  end
-
-  # Hacks
-
-  def test_declaration_hacks
-    assert_renders <<SASS, <<SCSS
-foo
-  _name: val
-  *name: val
-  #name: val
-  .name: val
-  name/**/: val
-  name/*\\**/: val
-  name: val
-SASS
-foo {
-  _name: val;
-  *name: val;
-  #name: val;
-  .name: val;
-  name/**/: val;
-  name/*\\**/: val;
-  name: val; }
-SCSS
-  end
-
-  def test_old_declaration_hacks
-    assert_renders <<SASS, <<SCSS, :old => true
-foo
-  :_name val
-  :*name val
-  :#name val
-  :.name val
-  :name val
-SASS
-foo {
-  _name: val;
-  *name: val;
-  #name: val;
-  .name: val;
-  name: val; }
-SCSS
-  end
-
-  def test_selector_hacks
-    assert_selector_renders = lambda do |s|
-      assert_renders <<SASS, <<SCSS
-#{s}
-  a: b
-SASS
-#{s} {
-  a: b; }
-SCSS
-    end
-
-    assert_selector_renders['> E']
-    assert_selector_renders['+ E']
-    assert_selector_renders['~ E']
-    assert_selector_renders['> > E']
-
-    assert_selector_renders['E*']
-    assert_selector_renders['E*.foo']
-    assert_selector_renders['E*:hover']
-  end
-
-  def test_disallowed_colon_hack
-    assert_raise_message(Sass::SyntaxError, 'The ":name: val" hack is not allowed in the Sass indented syntax') do
-      to_sass("foo {:name: val;}", :syntax => :scss)
-    end
-  end
-
-  # Sass 3 Deprecation conversions
-
-  def test_simple_quoted_strings_unquoted_with_equals
-    assert_sass_to_scss '$var: 1px foo + bar baz;', '!var = 1px "foo" + "bar" baz'
-    assert_sass_to_scss '$var: -foo-bar;', '!var = "-foo-bar"'
-  end
-
-  def test_complex_quoted_strings_explicitly_unquoted_with_equals
-    assert_sass_to_scss '$var: 1px unquote("foo + bar") baz;', '!var = 1px "foo + bar" baz'
-    assert_sass_to_scss "$var: unquote('foo\"bar');", '!var = "foo\"bar"'
-  end
-
-  def test_division_asserted_with_equals
-    assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  a: (1px / 2px); }
-SCSS
-foo
-  a = 1px / 2px
-SASS
-  end
-
-  def test_division_not_asserted_with_equals_when_unnecessary
-    assert_sass_to_scss <<SCSS, <<SASS
-$var: 1px / 2px;
-
-foo {
-  a: $var; }
-SCSS
-!var = 1px / 2px
-
-foo
-  a = !var
-SASS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-$var: 1px;
-
-foo {
-  a: $var / 2px; }
-SCSS
-!var = 1px
-
-foo
-  a = !var / 2px
-SASS
-
-    assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  a: 1 + 1px / 2px; }
-SCSS
-foo
-  a = 1 + 1px / 2px
-SASS
-  end
-
-  def test_nested_properties
-    assert_renders <<SASS, <<SCSS
-div
-  before: before
-  background:
-    color: blue
-    repeat: no-repeat
-  after: after
-SASS
-div {
-  before: before;
-  background: {
-    color: blue;
-    repeat: no-repeat; };
-  after: after; }
-
-SCSS
-  end
-
-  def test_dasherize
-    assert_sass_to_scss(<<SCSS, <<SASS, :dasherize => true)
-@mixin under-scored-mixin($under-scored-arg: $under-scored-default) {
-  bar: $under-scored-arg; }
-
-div {
-  foo: under-scored-fn($under-scored-var + "before\#{$another-under-scored-var}after");
-  @include under-scored-mixin($passed-arg);
-  selector-\#{$under-scored-interp}: bold; }
-
-@if $under-scored {
-  @for $for-var from $from-var to $to-var {
-    @while $while-var == true {
-      $while-var: false; } } }
-SCSS
-=under_scored_mixin($under_scored_arg: $under_scored_default)
-  bar: $under_scored_arg
-div
-  foo: under_scored_fn($under_scored_var + "before\#{$another_under_scored_var}after")
-  +under_scored_mixin($passed_arg)
-  selector-\#{$under_scored_interp}: bold
-@if $under_scored
-  @for $for_var from $from_var to $to_var
-    @while $while_var == true
-      $while_var : false
-SASS
-  end
-
-  def test_sass2_var_in_property_interpolation
-assert_sass_to_scss <<SCSS, <<SASS
-foo {
-  a: b \#{$c} d; }
-SCSS
-foo
-  a: b \#{!c} d
-SASS
-  end
-
-  def test_sass2_var_in_selector_interpolation
-assert_sass_to_scss <<SCSS, <<SASS
-foo-\#{$c} {
-  a: b; }
-SCSS
-foo-\#{!c}
-  a: b
-SASS
-  end
-
-  private
-
-  def assert_sass_to_sass(sass, options = {})
-    assert_equal(sass.rstrip, to_sass(sass, options).rstrip,
-      "Expected Sass to transform to itself")
-  end
-
-  def assert_scss_to_sass(sass, scss, options = {})
-    assert_equal(sass.rstrip, to_sass(scss, options.merge(:syntax => :scss)).rstrip,
-      "Expected SCSS to transform to Sass")
-  end
-
-  def assert_scss_to_scss(scss, in_scss = nil, options = nil)
-    if in_scss.is_a?(Hash)
-      options = in_scss
-      in_scss = nil
-    end
-
-    in_scss ||= scss
-    options ||= {}
-
-    assert_equal(scss.rstrip, to_scss(in_scss, options.merge(:syntax => :scss)).rstrip,
-      "Expected SCSS to transform to #{scss == in_scss ? 'itself' : 'SCSS'}k")
-  end
-
-  def assert_sass_to_scss(scss, sass, options = {})
-    assert_equal(scss.rstrip, to_scss(sass, options).rstrip,
-      "Expected Sass to transform to SCSS")
-  end
-
-  def assert_renders(sass, scss, options = {})
-    assert_sass_to_sass(sass, options)
-    assert_scss_to_sass(sass, scss, options)
-    assert_scss_to_scss(scss, options)
-    assert_sass_to_scss(scss, sass, options)
-  end
-
-  def to_sass(scss, options = {})
-    Haml::Util.silence_haml_warnings do
-      Sass::Engine.new(scss, options).to_tree.to_sass(options)
-    end
-  end
-
-  def to_scss(sass, options = {})
-    Haml::Util.silence_haml_warnings do
-      Sass::Engine.new(sass, options).to_tree.to_scss(options)
-    end
-  end
-end