DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

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

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦658f03805⟧ TextFile

    Length: 2120 (0x848)
    Types: TextFile
    Names: »FP_USER_PREFIX.S«

Derivation

└─⟦e0c43619c⟧ Bits:30005797 CR80 Disc pack ( Vol:FNJ1 861029/EC CR80 S/W Package II+III+IV+V+VII )
    └─ ⟦this⟧ »CSP004_V0801.D!CSS828.D!FP_USER_PREFIX.S« 

TextFile


%LIST     %LIST     %LIST
"-----------------------------------------------------------------------"
"                                                                       "
"  MODULE NAME:           FPIO                                          "
"  MODULE ID NMB:         CSS/828                                       "
"  MODULE VERSION:        01                                            "
"                                                                       "
"-----------------------------------------------------------------------"
%NOLIST   %NOLIST   %NOLIST

"-----------------------------------------------------------------"
"                                                                 "
"       F P _ U S E R _ P R E F I X                               "
"                                                                 "
"-----------------------------------------------------------------"
"                                                                 "
"  This file contains declarations of constant that can be use-   "
" full when using the floating_point package.( CSS/318 ).         "
"                                                                 "
"-----------------------------------------------------------------"

const
    " Constants for the REAL_FORM function. "

    NORMAL =        #4000;  "Print number  normalized"
    NO_NORMAL =         0;  "Do not print number normalized"
    NEG_SIGN =          0;  "Print only negative signs"
    POS_SIGN =      #8000;  "print both positive and negative signs"

const
    real_syntax =        #0A01;   "The fp number on the input stream was not syntactical correct"
    width_too_big =      #0A02;   "The specified print field width is to large"
    width_exceeded =     #0A03;   "The witdth of the print field is to small for the given precision."
    precision_exceeded = #0A04;   "The number doesn't contain enough significand bits."
    fpdec_conv_error = #0A05;    "An error occured during the conversion from binary to decimal"
    decfp_conv_error = #0A06;    "An error occured during the conversion from decimal to binary"