|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T V
Length: 1404 (0x57c)
Types: TextFile
Names: »V«
└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
└─⟦5cb1d1d7f⟧ »DATA«
└─⟦3b1ee7bd8⟧
└─⟦this⟧
with Lines;
package Structured_Comments_1 is
--
--
-- STRUCTURED COMMENT:
-- Structured comments have the following characterstics:
--
-- - They begin with the Ada comment designator "--".
--
-- - They contain a keyword field and a value field separated by
-- a colon. (eg. -- KEYWORD: This is the value field )
--
-- - Keywords may be any string but may not stretch across multiple
-- lines.
--
-- - Value fields may stretch across several lines.
--
-- - All structured comments are terminated with a line
-- containing a comment designator "--" with no following text.
--
-- EXAMPLES:
--
-- -- KEYWORD1: This is a value field
-- --
-- -- KEYWORD2: This is a value field that
-- -- stretches across multiple lines.
-- --
--
type Structured_Comment is private;
subtype Comment_Keyword is String;
function Define (Keyword : Comment_Keyword) return Structured_Comment;
--
-- The keyword of a structured comment is defined here.
-- The value field is filled in by the Parse operation.
function Keyword (Comment : Structured_Comment) return Comment_Keyword;
private
type Structured_Comment is new Boolean;
end Structured_Comments_1;