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 - downloadIndex: ┃ T V ┃
Length: 802 (0x322) Types: TextFile Names: »V«
└─⟦bfaa708f6⟧ Bits:30000531 8mm tape, Rational 1000, INSIGHT 1_3_0 └─ ⟦c51948655⟧ »DATA« └─⟦266b31e86⟧ └─⟦this⟧
generic Buffer_Index : in out Natural; Buffer : in out String; function Next_Token_Scanner return String; -- Return the next token from Buffer starting at Buffer_Index. -- Tokens are delimited by one or more blanks. Blanks are not returned. -- Quoted strings ("abc") are returned as a single token without -- the quotes. Within a quoted string, "" represents a single double-quote. -- The Buffer string is shifted when a double quote is found. -- Buffer_Index is updated as the scan proceeds. The last token will end -- with the end of the string. -- The null string is returned when no more tokens are available. -- (Buffer_Pointer>Buffer'last). -- -- Start with Buffer_Pointer = Buffer'first to begin the scan. The first -- character considered for each token is Buffer(Buffer_Index).