30 lines
379 B
Plaintext
30 lines
379 B
Plaintext
note
|
|
description: "Summary description for {ARRAY_DER_SINK}."
|
|
author: ""
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
ARRAY_DER_SINK
|
|
|
|
inherit
|
|
DER_OCTET_SINK
|
|
|
|
create
|
|
make
|
|
|
|
feature
|
|
make (target_a: ARRAY [NATURAL_8])
|
|
do
|
|
target := target_a
|
|
end
|
|
|
|
sink (item: NATURAL_8)
|
|
do
|
|
target.force (item, target.upper + 1)
|
|
end
|
|
|
|
feature {NONE}
|
|
target: ARRAY [NATURAL_8]
|
|
end
|