b674dbddf7
Remove infix "@" which is deprecated now. Add invariant for values to show that it is always not Void. Add postcondition of add.
110 lines
1.8 KiB
Plaintext
110 lines
1.8 KiB
Plaintext
indexing
|
|
description: "[
|
|
JSON_ARRAY represent an array in JSON.
|
|
An array in JSON is an ordered set of names.
|
|
Examples
|
|
array
|
|
[]
|
|
[elements]
|
|
]"
|
|
|
|
author: "Javier Velilla"
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
JSON_ARRAY
|
|
inherit
|
|
JSON_VALUE
|
|
|
|
create
|
|
make_array
|
|
|
|
feature -- Initialization
|
|
make_array is
|
|
--
|
|
do
|
|
create values.make (10)
|
|
end
|
|
|
|
feature -- Access
|
|
i_th alias "[]" (i: INTEGER):JSON_VALUE is
|
|
-- Item at `i'-th position
|
|
require
|
|
is_valid_index:valid_index (i)
|
|
do
|
|
Result := values.i_th (i)
|
|
end
|
|
|
|
feature -- Mesurement
|
|
count:INTEGER is
|
|
--
|
|
do
|
|
Result:=values.count
|
|
end
|
|
|
|
feature -- Status report
|
|
valid_index (i: INTEGER): BOOLEAN is
|
|
-- Is `i' a valid index?
|
|
do
|
|
Result := (1 <= i) and (i <= count)
|
|
end
|
|
|
|
feature -- Change Element
|
|
add(value:JSON_VALUE) is
|
|
require
|
|
not_null:value /= void
|
|
do
|
|
values.extend(value)
|
|
ensure
|
|
has_new_value:old values.count + 1 = values.count and
|
|
values.has (value)
|
|
end
|
|
|
|
feature -- Report
|
|
to_json:STRING is
|
|
--Printable json representation
|
|
-- [] or [elements]
|
|
local
|
|
value:JSON_VALUE
|
|
do
|
|
create Result.make_empty
|
|
Result.append("[")
|
|
from
|
|
values.start
|
|
until
|
|
values.off
|
|
loop
|
|
value:=values.item
|
|
Result.append(value.to_json)
|
|
values.forth
|
|
if not values.after then
|
|
Result.append(",")
|
|
end
|
|
end
|
|
Result.append("]")
|
|
end
|
|
|
|
hash_code:INTEGER is
|
|
--
|
|
do
|
|
from
|
|
values.start
|
|
Result:=values.item.hash_code
|
|
until
|
|
values.off
|
|
loop
|
|
Result:= ((Result \\ 8388593) |<< 8) + values.item.hash_code
|
|
values.forth
|
|
end
|
|
Result := Result \\ values.count
|
|
|
|
end
|
|
feature {NONE} --Implementation
|
|
values:ARRAYED_LIST[JSON_VALUE]
|
|
|
|
invariant
|
|
value_not_void: values /= Void
|
|
|
|
end
|