From d2aafe02e7b15cfbce3265c796e49faa565f33a9 Mon Sep 17 00:00:00 2001
From: Victor Seva <linuxmaniac@torreviejawireless.org>
Date: Wed, 27 Mar 2013 16:15:54 +0100
Subject: [PATCH] Upgraded luaunit

---
 luaunit.lua | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/luaunit.lua b/luaunit.lua
index ddced51..84f6d18 100644
--- a/luaunit.lua
+++ b/luaunit.lua
@@ -188,6 +188,18 @@ function assertIsFunction(value)
     end
 end
 
+function assertIs(actual, expected)
+    if actual ~= expected then
+        error( errormsg(actual, expected), 2 )
+    end
+end
+
+function assertNotIs(actual, expected)
+    if actual == expected then
+        error( errormsg(actual, expected), 2 )
+    end
+end
+
 assert_equals = assertEquals
 assert_not_equals = assertNotEquals
 assert_error = assertError
@@ -199,6 +211,8 @@ assert_is_table = assertIsTable
 assert_is_boolean = assertIsBoolean
 assert_is_nil = assertIsNil
 assert_is_function = assertIsFunction
+assert_is = assertIs
+assert_not_is = assertNotIs
 
 function __genOrderedIndex( t )
     local orderedIndex = {}