From 114fabd29ae7ca9826c845ad10f27da58bb54210 Mon Sep 17 00:00:00 2001
From: Arfon Smith <arfon@github.com>
Date: Tue, 4 Nov 2014 16:12:46 -0600
Subject: [PATCH] Test for Hack heuristic

---
 test/test_heuristics.rb | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/test/test_heuristics.rb b/test/test_heuristics.rb
index 84656fdc..e75fb470 100644
--- a/test/test_heuristics.rb
+++ b/test/test_heuristics.rb
@@ -40,25 +40,25 @@ class TestHeuristcs < Test::Unit::TestCase
     match = Language.detect(blob)
     assert_equal Language["Objective-C"], match
   end
-  
+
   def test_pl_prolog_by_heuristics
     languages = ["Perl", "Prolog"]
     results = Heuristics.disambiguate_pl(fixture("Prolog/turing.pl"), languages)
     assert_equal Language["Prolog"], results.first
   end
-  
+
   def test_pl_perl_by_heuristics
     languages = ["Perl", "Prolog"]
     results = Heuristics.disambiguate_pl(fixture("Perl/perl-test.t"), languages)
     assert_equal Language["Perl"], results.first
   end
-  
+
   def test_ecl_prolog_by_heuristics
     languages = ["ECL", "Prolog"]
     results = Heuristics.disambiguate_ecl(fixture("Prolog/or-constraint.ecl"), languages)
     assert_equal Language["Prolog"], results.first
   end
-  
+
   def test_ecl_ecl_by_heuristics
     languages = ["ECL", "Prolog"]
     results = Heuristics.disambiguate_ecl(fixture("ECL/sample.ecl"), languages)
@@ -105,6 +105,12 @@ class TestHeuristcs < Test::Unit::TestCase
     end
   end
 
+  def test_hack_by_heuristics
+    languages = ["Hack", "PHP"]
+    results = Heuristics.disambiguate_hack(fixture("Hack/funs.php"), languages)
+    assert_equal Language["Hack"], results.first
+  end
+
   def test_sc_supercollider_by_heuristics
     languages = ["Scala", "SuperCollider"]
     results = Heuristics.disambiguate_sc(fixture("SuperCollider/WarpPreset.sc"), languages)