Change void to Void.

Add invariant for 'object' , object_no_null /= Void
2008-08-08 11:04:33 +00:00
parent d64e01641b
commit 2c42c0dd1a
1 changed files with 4 additions and 1 deletions
--- a/json/json_object.e
+++ b/json/json_object.e
@@ -51,7 +51,7 @@ feature -- Change Element
 			l_value: JSON_VALUE
 		do
 			l_value:=value
-			if value = void then
+			if value = Void then
 				create l_json_null
 				l_value:=l_json_null
 			end
@@ -133,4 +133,7 @@ feature {NONE} -- Implementation

 	object: HASH_TABLE[JSON_VALUE,JSON_STRING]

+invariant
+	object_not_null: object /= Void
+
 end