DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦c5705e590⟧ TextFile

    Length: 6264 (0x1878)
    Types: TextFile
    Notes: R1k Text-file segment

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦79bd11d70⟧ 
            └─⟦this⟧ 

TextFile


=== Test Section => X_Rm_Unique_Quark

Unique quark 1000 => Unique# 1000
Unique quark 1001 => Unique# 1001
Unique quark 1002 => Unique# 1002
Unique quark 1003 => Unique# 1003
Unique quark 1004 => Unique# 1004

=== Test Section => X_Rm_Quark_To/From_String

Component "0"                 1005 => "0"
Component "One"               1006 => "One"
Component "Two"               1007 => "Two"
Component "Three"             1008 => "Three"
Component "Four"              1009 => "Four"
Component "And-A_Long_String" 1010 => "And-A_Long_String"
Component "Something_Else"    1011 => "Something_Else"
Component "something_else"    1012 => "something_else"

=== Test Section => X_Rm_Quark_To/From_Old_String

Component "0"                 1005 => "0"
Component "One"               1006 => "One"
Component "Two"               1007 => "Two"
Component "Three"             1008 => "Three"
Component "Four"              1009 => "Four"
Component "And-A_Long_String" 1010 => "And-A_Long_String"
Component "Something_Else"    1011 => "Something_Else"
Component "something_else"    1012 => "something_else"

=== Test Section => Simple quark lists

Components := "One"
Result => 
    1 "One"

Components := "Two."
Result => 
    1 "Two"
    2 ""

Components := "Three*Four"
Result => 
    1 "Three"
    2 "Four"

Components := "Four.Three.One.Two.Something_Else"
Result => 
    1 "Four"
    2 "Three"
    3 "One"
    4 "Two"
    5 "Something_Else"

Components := "_0*1.2-3_"
Result => 
    1 "_0"
    2 "1"
    3 "2-3_"

Components := "A.B.C.D.E.F.G"
Result => 
    1 "A"
    2 "B"
    3 "C"
    4 "D"
    5 "E"
    6 "F"
    7 "G"


=== Test Section => Tight Quark/Binding lists

Components := "One"
Result => 
    1 X_RM_BIND_TIGHTLY "One"

Components := "Two."
Result => 
    1 X_RM_BIND_TIGHTLY "Two"
    2 X_RM_BIND_TIGHTLY ""

Components := "Three.Four"
Result => 
    1 X_RM_BIND_TIGHTLY "Three"
    2 X_RM_BIND_TIGHTLY "Four"

Components := "Four.Three.One.Two.Something_Else"
Result => 
    1 X_RM_BIND_TIGHTLY "Four"
    2 X_RM_BIND_TIGHTLY "Three"
    3 X_RM_BIND_TIGHTLY "One"
    4 X_RM_BIND_TIGHTLY "Two"
    5 X_RM_BIND_TIGHTLY "Something_Else"

Components := "A.B.C.D.E.F.G"
Result => 
    1 X_RM_BIND_TIGHTLY "A"
    2 X_RM_BIND_TIGHTLY "B"
    3 X_RM_BIND_TIGHTLY "C"
    4 X_RM_BIND_TIGHTLY "D"
    5 X_RM_BIND_TIGHTLY "E"
    6 X_RM_BIND_TIGHTLY "F"
    7 X_RM_BIND_TIGHTLY "G"


=== Test Section => Mixed Quark/Binding lists

Components := "One"
Result => 
    1 X_RM_BIND_TIGHTLY "One"

Components := "*One"
Result => 
    1 X_RM_BIND_LOOSELY "One"

Components := ".One"
Result => 
    1 X_RM_BIND_TIGHTLY "One"

Components := "Two."
Result => 
    1 X_RM_BIND_TIGHTLY "Two"
    2 X_RM_BIND_TIGHTLY ""

Components := "Two*"
Result => 
    1 X_RM_BIND_TIGHTLY "Two"
    2 X_RM_BIND_LOOSELY ""

Components := "Three.Four"
Result => 
    1 X_RM_BIND_TIGHTLY "Three"
    2 X_RM_BIND_TIGHTLY "Four"

Components := "Three*Four"
Result => 
    1 X_RM_BIND_TIGHTLY "Three"
    2 X_RM_BIND_LOOSELY "Four"

Components := "Four.Three.One.Two.Something_Else"
Result => 
    1 X_RM_BIND_TIGHTLY "Four"
    2 X_RM_BIND_TIGHTLY "Three"
    3 X_RM_BIND_TIGHTLY "One"
    4 X_RM_BIND_TIGHTLY "Two"
    5 X_RM_BIND_TIGHTLY "Something_Else"

Components := "*Four.Three*One.Two*Something_Else"
Result => 
    1 X_RM_BIND_LOOSELY "Four"
    2 X_RM_BIND_TIGHTLY "Three"
    3 X_RM_BIND_LOOSELY "One"
    4 X_RM_BIND_TIGHTLY "Two"
    5 X_RM_BIND_LOOSELY "Something_Else"

Components := "A*B*C*D.E.F.G"
Result => 
    1 X_RM_BIND_TIGHTLY "A"
    2 X_RM_BIND_LOOSELY "B"
    3 X_RM_BIND_LOOSELY "C"
    4 X_RM_BIND_LOOSELY "D"
    5 X_RM_BIND_TIGHTLY "E"
    6 X_RM_BIND_TIGHTLY "F"
    7 X_RM_BIND_TIGHTLY "G"


=== Test Section => Interesting X_Rm_Quark_To/From_String cases

Component ""                  1013 => ""
Component ""                  1013 => ""
Component "."                  is invalid.
Component "*"                  is invalid.
Component "A bad component.."  is invalid.
Quark "...but a good quark!"  1024 => "...but a good quark!"
Quark "...but a good quark!"  1024 => "...but a good quark!"

=== Test Section => Interesting X_Rm_Quark_To_List cases

Components := "Mixed*Separators.In.Component*Lists"
Result => 
    1 "Mixed"
    2 "Separators"
    3 "In"
    4 "Component"
    5 "Lists"

Components := "... Bogus list ..."
Result => ?
    1 ""
    2 ""
    3 " Bogus list "
    4 ""
    5 ""
    6 ""

Components := "...Valid.List..."
Result => 
    1 ""
    2 ""
    3 "Valid"
    4 "List"
    5 ""
    6 ""
    7 ""

Components := "Nul.Terminator\ 0\ stops processing"
Result => 
    1 "Nul"
    2 "Terminator"

Components := "\ 0\ Leading null"
Result => 
    1 ""

Components := "Another.Nul.\ 0\"
Result => 
    1 "Another"
    2 "Nul"
    3 ""

Quark-List := "Junk accepted in *QUARK* lists!"
Result => 
    1 "Junk accepted in "
    2 "QUARK"
    3 " lists!"

Components := ""
Result => 
    1 ""

Components := "*.*.*"
Result => 
    1 ""
    2 ""
    3 ""
    4 ""
    5 ""


=== Test Section => Interesting X_Rm_Quark_To_Binding_List cases

Components := ""
Result => 
    1 X_RM_BIND_TIGHTLY ""

Components := ".*.*."
Result => 
    1 X_RM_BIND_TIGHTLY ""
    2 X_RM_BIND_LOOSELY ""
    3 X_RM_BIND_TIGHTLY ""
    4 X_RM_BIND_LOOSELY ""
    5 X_RM_BIND_TIGHTLY ""

Components := "... Bogus list ..."
Result => ?
    1 X_RM_BIND_TIGHTLY ""
    2 X_RM_BIND_TIGHTLY ""
    3 X_RM_BIND_TIGHTLY " Bogus list "
    4 X_RM_BIND_TIGHTLY ""
    5 X_RM_BIND_TIGHTLY ""
    6 X_RM_BIND_TIGHTLY ""

Components := "...Valid.list..."
Result => 
    1 X_RM_BIND_TIGHTLY ""
    2 X_RM_BIND_TIGHTLY ""
    3 X_RM_BIND_TIGHTLY "Valid"
    4 X_RM_BIND_TIGHTLY "list"
    5 X_RM_BIND_TIGHTLY ""
    6 X_RM_BIND_TIGHTLY ""
    7 X_RM_BIND_TIGHTLY ""

Components := "*Terminating.Nul\ 0\ stops processing"
Result => 
    1 X_RM_BIND_LOOSELY "Terminating"
    2 X_RM_BIND_TIGHTLY "Nul"

Components := "\ 0\ Leading nul"
Result => 
    1 X_RM_BIND_TIGHTLY ""

Components := "Another.Nul.\ 0\"
Result => 
    1 X_RM_BIND_TIGHTLY "Another"
    2 X_RM_BIND_TIGHTLY "Nul"
    3 X_RM_BIND_TIGHTLY ""

Quark-List := "Junk accepted in *QUARK* lists!"
Result => 
    1 X_RM_BIND_TIGHTLY "Junk accepted in "
    2 X_RM_BIND_LOOSELY "QUARK"
    3 X_RM_BIND_LOOSELY " lists!"


End of log