(configuration weitek(pascal_basic, pascal_novice_files); definitions weitek_ieee(pascal_basic*); forward; program weitek_ieee_impl_a(pascal_basic, pascal_novice_files, weitek_ieee); forward; program weitek_ieee_impl_b(pascal_basic, weitek_ieee); forward; begin weitek_ieee, weitek_ieee_impl_a := Halt, Xor, Zero, Pluszero, Minuszero, Issignificandzero, Iszero, Isnormalzero, Isinfinity, Isnan, Istrappingnan, Isfinite, Issame, Isunnormalized, Isdenormalized, Isnormalized, SetDivbyzero, SetInvalid, SetOverflow, SetUnderflow, SetInexact, UpdateFlags, Gettrappingnan, Getnontrappingnan, Getnan, Selectnan, Plusinf, Flmo, Oneoperandcase, Twooperandcase, Shftl, Shftr, Examine, Roundnum, CheckUnderAndRound, CheckInvAndOv, Addsignificands, Addoperands, Multsignificands, Dividesignificands, Pack, Packs, Packd, Packe, Unpack, Unpacks, Unpackd, Unpacke, Add, Subtract, Multiply, Divide, Remainder; weitek_ieee, weitek_ieee_impl_b := $rest$; end) := weitek.pas; INVENTFILENAMES TRUE; MAKEFILE compile_weitek; TARGET cedar; œfile: Weitek.mod within: /indigo/... last modified by: McCreight, June 19, 1984 10:40:03 am PDT last modified by: Curry, June 19, 1984 3:41:16 pm PDT Κ{˜Jšœ$™$J™:J™5unitšœ9˜9Kšœ0˜0KšœT˜TKšœ?˜?K˜Kšœψ˜ψKšœ*˜*Kšœ˜—K˜Kšœ˜K˜ J˜J˜J˜J˜—…—