class ZCODEC_GENERATOR_TEST_SET
Test class ZCODEC_GENERATOR
note
description: "Test class ${ZCODEC_GENERATOR}"
author: "Finnian Reilly"
copyright: "Copyright (c) 2001-2022 Finnian Reilly"
contact: "finnian at eiffel hyphen loop dot com"
license: "MIT license (See: en.wikipedia.org/wiki/MIT_License)"
date: "2024-01-20 19:18:27 GMT (Saturday 20th January 2024)"
revision: "15"
class
ZCODEC_GENERATOR_TEST_SET
inherit
EL_FILE_DATA_TEST_SET
create
make
feature {NONE} -- Initialization
make
-- initialize `test_table'
do
make_named (<<
["generation", agent test_generation]
>>)
end
feature -- Tests
test_generation
local
command: ZCODEC_GENERATOR; count: INTEGER
do
create command.make ("test-data/sources/C/decoder.c", "doc/zcodec/template.evol")
command.execute
lio.put_new_line
across OS.file_list (Work_area_dir, "*.e") as path loop
if attached path.item.base_name.split_list ('_')[4] as id then
lio.put_labeled_string ("Comparing content digest for id", id)
lio.put_new_line
if Digest_table.has_key (id.to_integer) then
assert ("has BOM", File.has_utf_8_bom (path.item))
assert_same_digest (Plain_text, path.item, Digest_table.found_item)
count := count + 1
else
assert ("Source has digest", False)
end
end
end
assert ("all codecs checked", count = Digest_table.count)
end
feature {NONE} -- Constants
Digest_table: EL_HASH_TABLE [STRING, INTEGER]
once
create Result.make (<<
[11, "tinw3eQJmF1p8ofVJDSwgA=="],
[15, "PW7E9PbW8j+3W033035XCg=="],
[2, "Q4AmYkSawypr7od2UHUU6g=="],
[6, "qNDQ9cacl5JPLy7F78YTSw=="]
>>)
end
end