/ Mac Power 1997 January / macpower199701.bin / AMUG / Programming_10 / Videotoolbox 96-08-22-c.sit / VideoToolbox / VideoToolboxSources / fp.c

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 04 66 70 2e 63 00 00 | 00 00 00 00 00 00 00 00 |..fp.c..|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 0c 0f 00 | 00 01 9a ac 56 92 e5 ac |........|....V...|
|00000060| 56 92 e5 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |V.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 89 7c 00 00 |........|.....|..|
|00000080| 2f 2a 20 66 70 2e 63 0d | 4e 4f 54 45 3a 20 61 73 |/* fp.c.|NOTE: as|
|00000090| 20 6f 66 20 53 79 73 74 | 65 6d 20 37 2e 35 2e 31 | of Syst|em 7.5.1|
|000000a0| 20 41 70 70 6c 65 27 73 | 20 66 70 20 72 6f 75 74 | Apple's| fp rout|
|000000b0| 69 6e 65 73 20 61 72 65 | 20 61 76 61 69 6c 61 62 |ines are| availab|
|000000c0| 6c 65 20 6f 6e 20 62 6f | 74 68 0d 50 6f 77 65 72 |le on bo|th.Power|
|000000d0| 50 43 20 61 6e 64 20 36 | 38 6b 20 4d 61 63 73 2c |PC and 6|8k Macs,|
|000000e0| 20 73 6f 20 74 68 69 73 | 20 66 69 6c 65 20 69 73 | so this| file is|
|000000f0| 20 6f 62 73 6f 6c 65 74 | 65 2e 0d 0d 41 70 70 6c | obsolet|e...Appl|
|00000100| 65 20 70 72 6f 76 69 64 | 65 73 20 61 20 77 68 6f |e provid|es a who|
|00000110| 6c 65 20 62 75 6e 63 68 | 20 6f 66 20 6e 69 63 65 |le bunch| of nice|
|00000120| 20 66 75 6e 63 74 69 6f | 6e 73 20 74 68 61 74 20 | functio|ns that |
|00000130| 61 72 65 20 64 65 66 69 | 6e 65 64 20 69 6e 20 66 |are defi|ned in f|
|00000140| 70 2e 68 2c 20 62 75 74 | 0d 75 6e 66 6f 72 74 75 |p.h, but|.unfortu|
|00000150| 6e 61 74 65 6c 79 2c 20 | 61 74 20 70 72 65 73 65 |nately, |at prese|
|00000160| 6e 74 20 74 68 65 79 20 | 6f 6e 6c 79 20 65 78 69 |nt they |only exi|
|00000170| 73 74 20 6f 6e 20 74 68 | 65 20 50 6f 77 65 72 50 |st on th|e PowerP|
|00000180| 43 2e 20 41 73 20 61 20 | 73 74 6f 70 2d 67 61 70 |C. As a |stop-gap|
|00000190| 2c 20 75 6e 74 69 6c 0d | 41 70 70 6c 65 20 70 72 |, until.|Apple pr|
|000001a0| 6f 76 69 64 65 73 20 74 | 68 65 6d 20 66 6f 72 20 |ovides t|hem for |
|000001b0| 36 38 6b 20 6d 61 63 68 | 69 6e 65 73 20 61 73 20 |68k mach|ines as |
|000001c0| 77 65 6c 6c 2c 20 49 27 | 76 65 20 77 72 69 74 74 |well, I'|ve writt|
|000001d0| 65 6e 20 74 68 65 73 65 | 20 36 38 6b 2d 63 6f 6d |en these| 68k-com|
|000001e0| 70 61 74 69 62 6c 65 0d | 65 71 75 69 76 61 6c 65 |patible.|equivale|
|000001f0| 6e 74 73 2e 20 59 6f 75 | 20 63 61 6e 20 73 61 66 |nts. You| can saf|
|00000200| 65 6c 79 20 69 6e 63 6c | 75 64 65 20 74 68 69 73 |ely incl|ude this|
|00000210| 20 66 69 6c 65 20 69 6e | 20 61 6c 6c 20 79 6f 75 | file in| all you|
|00000220| 72 20 70 72 6f 6a 65 63 | 74 73 2e 20 54 68 69 73 |r projec|ts. This|
|00000230| 20 66 69 6c 65 0d 6f 6d | 69 74 73 20 69 74 73 65 | file.om|its itse|
|00000240| 6c 66 20 69 66 20 41 70 | 70 6c 65 27 73 20 76 65 |lf if Ap|ple's ve|
|00000250| 72 73 69 6f 6e 73 20 6f | 66 20 74 68 65 20 66 75 |rsions o|f the fu|
|00000260| 6e 63 74 69 6f 6e 73 20 | 61 72 65 20 61 76 61 69 |nctions |are avai|
|00000270| 6c 61 62 6c 65 2e 0d 0d | 41 74 20 70 72 65 73 65 |lable...|At prese|
|00000280| 6e 74 20 74 68 69 73 20 | 66 69 6c 65 20 6f 6e 6c |nt this |file onl|
|00000290| 79 20 64 65 66 69 6e 65 | 73 3a 20 6c 64 74 6f 78 |y define|s: ldtox|
|000002a0| 38 30 2c 20 78 38 30 74 | 6f 6c 64 2c 20 61 6e 64 |80, x80t|old, and|
|000002b0| 20 66 70 63 6c 61 73 73 | 69 66 79 2e 20 54 68 69 | fpclass|ify. Thi|
|000002c0| 73 20 72 65 70 6c 61 63 | 65 73 0d 74 68 65 20 66 |s replac|es.the f|
|000002d0| 75 6e 63 74 69 6f 6e 73 | 20 66 6f 72 6d 65 72 6c |unctions| formerl|
|000002e0| 79 20 70 72 6f 76 69 64 | 65 64 20 62 79 20 74 68 |y provid|ed by th|
|000002f0| 65 20 56 69 64 65 6f 54 | 6f 6f 6c 62 6f 78 20 53 |e VideoT|oolbox S|
|00000300| 61 6e 65 2e 63 2c 20 77 | 68 69 63 68 20 49 27 76 |ane.c, w|hich I'v|
|00000310| 65 20 6e 6f 77 20 64 69 | 73 63 61 72 64 65 64 2e |e now di|scarded.|
|00000320| 0d 59 6f 75 20 6d 61 79 | 20 61 6c 73 6f 20 77 61 |.You may| also wa|
|00000330| 6e 74 20 74 6f 20 6c 6f | 6f 6b 20 61 74 20 74 68 |nt to lo|ok at th|
|00000340| 65 20 66 75 6e 63 74 69 | 6f 6e 73 20 64 65 66 69 |e functi|ons defi|
|00000350| 6e 65 64 20 69 6e 20 49 | 73 4e 61 6e 2e 63 2c 20 |ned in I|sNan.c, |
|00000360| 77 68 69 63 68 20 61 72 | 65 20 76 65 72 79 0d 73 |which ar|e very.s|
|00000370| 69 6d 69 6c 61 72 2c 20 | 74 68 6f 75 67 68 20 6e |imilar, |though n|
|00000380| 6f 74 20 69 64 65 6e 74 | 69 63 61 6c 20 74 6f 20 |ot ident|ical to |
|00000390| 73 65 76 65 72 61 6c 20 | 66 70 2e 68 20 66 75 6e |several |fp.h fun|
|000003a0| 63 74 69 6f 6e 73 2e 0d | 0d 6c 64 74 6f 78 38 30 |ctions..|.ldtox80|
|000003b0| 20 61 6e 64 20 78 38 30 | 74 6f 6c 64 20 63 6f 6e | and x80|told con|
|000003c0| 76 65 72 74 20 62 61 63 | 6b 20 61 6e 64 20 66 6f |vert bac|k and fo|
|000003d0| 72 74 68 20 62 65 74 77 | 65 65 6e 20 6c 6f 6e 67 |rth betw|een long|
|000003e0| 20 64 6f 75 62 6c 65 20 | 28 61 6e 79 20 73 69 7a | double |(any siz|
|000003f0| 65 29 0d 61 6e 64 20 31 | 30 2d 62 79 74 65 20 66 |e).and 1|0-byte f|
|00000400| 6c 6f 61 74 69 6e 67 20 | 70 6f 69 6e 74 20 66 6f |loating |point fo|
|00000410| 72 6d 61 74 73 2e 20 54 | 68 65 20 31 30 2d 20 61 |rmats. T|he 10- a|
|00000420| 6e 64 20 31 32 2d 62 79 | 74 65 20 66 6f 72 6d 61 |nd 12-by|te forma|
|00000430| 74 73 20 63 6f 6e 74 61 | 69 6e 20 65 78 61 63 74 |ts conta|in exact|
|00000440| 6c 79 0d 74 68 65 20 73 | 61 6d 65 20 69 6e 66 6f |ly.the s|ame info|
|00000450| 72 6d 61 74 69 6f 6e 2e | 20 54 68 65 20 31 32 2d |rmation.| The 12-|
|00000460| 62 79 74 65 20 66 6f 72 | 6d 61 74 2c 20 75 73 65 |byte for|mat, use|
|00000470| 64 20 62 79 20 74 68 65 | 20 4d 6f 74 6f 72 6f 6c |d by the| Motorol|
|00000480| 61 20 36 38 38 38 31 20 | 61 6e 64 20 36 38 30 34 |a 68881 |and 6804|
|00000490| 30 0d 66 6c 6f 61 74 69 | 6e 67 20 70 6f 69 6e 74 |0.floati|ng point|
|000004a0| 20 63 68 69 70 73 2c 20 | 68 61 73 20 61 6e 20 75 | chips, |has an u|
|000004b0| 6e 75 73 65 64 20 32 2d | 62 79 74 65 20 67 61 70 |nused 2-|byte gap|
|000004c0| 20 62 65 74 77 65 65 6e | 20 74 68 65 20 65 78 70 | between| the exp|
|000004d0| 6f 6e 65 6e 74 20 61 6e | 64 20 6d 61 6e 74 69 73 |onent an|d mantis|
|000004e0| 73 61 2e 0d 0d 4b 4e 4f | 57 4e 20 42 55 47 53 3a |sa...KNO|WN BUGS:|
|000004f0| 0d 42 6f 73 63 6f 20 54 | 6a 61 6e 20 72 65 70 6f |.Bosco T|jan repo|
|00000500| 72 74 65 64 20 74 68 61 | 74 20 53 79 6d 61 6e 74 |rted tha|t Symant|
|00000510| 65 63 20 43 2b 2b 20 64 | 6f 65 73 6e 27 74 20 6c |ec C++ d|oesn't l|
|00000520| 69 6b 65 20 74 68 69 73 | 20 66 69 6c 65 2c 20 61 |ike this| file, a|
|00000530| 73 20 6e 6f 74 65 64 20 | 62 65 6c 6f 77 2e 20 49 |s noted |below. I|
|00000540| 27 6d 20 6e 6f 74 0d 62 | 6f 74 68 65 72 69 6e 67 |'m not.b|othering|
|00000550| 20 74 6f 20 66 69 78 20 | 69 74 20 62 65 63 61 75 | to fix |it becau|
|00000560| 73 65 20 61 73 20 66 61 | 72 20 61 73 20 49 20 6b |se as fa|r as I k|
|00000570| 6e 6f 77 20 74 68 69 73 | 20 66 69 6c 65 20 69 73 |now this| file is|
|00000580| 20 6f 62 73 6f 6c 65 74 | 65 2e 20 49 66 20 49 27 | obsolet|e. If I'|
|00000590| 6d 0d 77 72 6f 6e 67 2c | 20 61 6e 64 20 79 6f 75 |m.wrong,| and you|
|000005a0| 20 6e 65 65 64 20 74 6f | 20 75 73 65 20 74 68 69 | need to| use thi|
|000005b0| 73 20 66 69 6c 65 2c 20 | 6c 65 74 20 6d 65 20 6b |s file, |let me k|
|000005c0| 6e 6f 77 20 61 6e 64 20 | 49 27 6c 6c 20 74 72 79 |now and |I'll try|
|000005d0| 20 74 6f 20 66 69 78 20 | 69 74 2e 0d 0d 55 6e 64 | to fix |it...Und|
|000005e0| 65 66 69 6e 65 64 20 22 | 78 39 36 74 6f 78 38 30 |efined "|x96tox80|
|000005f0| 2c 78 38 30 74 6f 78 39 | 36 2c 65 78 74 65 6e 64 |,x80tox9|6,extend|
|00000600| 65 64 38 30 2c 65 78 74 | 65 6e 64 65 64 39 36 22 |ed80,ext|ended96"|
|00000610| 2e 20 20 0d 57 68 65 6e | 20 49 20 63 68 61 6e 67 |.  .When| I chang|
|00000620| 65 64 20 74 68 65 20 63 | 6f 64 65 20 66 72 6f 6d |ed the c|ode from|
|00000630| 20 23 69 66 20 30 20 74 | 6f 20 23 69 66 20 31 20 | #if 0 t|o #if 1 |
|00000640| 74 6f 20 69 6e 63 6c 75 | 64 65 20 53 41 4e 45 2e |to inclu|de SANE.|
|00000650| 68 2c 0d 49 20 73 74 69 | 6c 6c 20 67 6f 74 20 6f |h,.I sti|ll got o|
|00000660| 6e 65 20 70 72 6f 62 6c | 65 6d 20 2d 2d 20 65 78 |ne probl|em -- ex|
|00000670| 74 65 6e 64 65 64 39 36 | 20 69 73 20 6e 6f 74 20 |tended96| is not |
|00000680| 64 65 66 69 6e 65 64 20 | 6f 6e 20 50 50 43 73 22 |defined |on PPCs"|
|00000690| 0d 0d 0d 48 49 53 54 4f | 52 59 3a 0d 31 30 2f 38 |...HISTO|RY:.10/8|
|000006a0| 2f 39 34 20 64 67 70 20 | 77 72 6f 74 65 20 69 74 |/94 dgp |wrote it|
|000006b0| 2e 0d 2a 2f 0d 23 69 6e | 63 6c 75 64 65 20 22 56 |..*/.#in|clude "V|
|000006c0| 69 64 65 6f 54 6f 6f 6c | 62 6f 78 2e 68 22 0d 23 |ideoTool|box.h".#|
|000006d0| 69 66 20 21 64 65 66 69 | 6e 65 64 28 5f 5f 46 50 |if !defi|ned(__FP|
|000006e0| 5f 5f 29 09 2f 2f 20 43 | 6f 6e 64 69 74 69 6f 6e |__).// C|ondition|
|000006f0| 61 6c 20 61 70 70 6c 69 | 65 73 20 74 6f 20 72 65 |al appli|es to re|
|00000700| 73 74 20 6f 66 20 66 69 | 6c 65 2e 0d 0d 23 69 66 |st of fi|le...#if|
|00000710| 20 30 0d 09 23 75 6e 64 | 65 66 20 49 4e 46 0d 09 | 0..#und|ef INF..|
|00000720| 23 75 6e 64 65 66 20 50 | 49 0d 09 23 75 6e 64 65 |#undef P|I..#unde|
|00000730| 66 20 4e 41 4e 0d 09 23 | 69 6e 63 6c 75 64 65 20 |f NAN..#|include |
|00000740| 3c 53 41 4e 45 2e 68 3e | 09 2f 2f 20 78 39 36 74 |<SANE.h>|.// x96t|
|00000750| 6f 78 38 30 2c 78 38 30 | 74 6f 78 39 36 2c 65 78 |ox80,x80|tox96,ex|
|00000760| 74 65 6e 64 65 64 38 30 | 2c 65 78 74 65 6e 64 65 |tended80|,extende|
|00000770| 64 39 36 0d 23 65 6c 73 | 65 0d 09 2f 2f 20 69 66 |d96.#els|e..// if|
|00000780| 20 65 78 74 65 6e 64 65 | 64 38 30 20 61 6e 64 20 | extende|d80 and |
|00000790| 65 78 74 65 6e 64 65 64 | 39 36 20 61 72 65 20 75 |extended|96 are u|
|000007a0| 6e 64 65 66 69 6e 65 64 | 2c 20 63 68 61 6e 67 65 |ndefined|, change|
|000007b0| 20 74 68 65 20 22 23 69 | 66 20 30 22 20 74 6f 20 | the "#i|f 0" to |
|000007c0| 22 23 69 66 20 31 22 20 | 61 62 6f 76 65 2e 0d 09 |"#if 1" |above...|
|000007d0| 76 6f 69 64 20 78 39 36 | 74 6f 78 38 30 28 65 78 |void x96|tox80(ex|
|000007e0| 74 65 6e 64 65 64 39 36 | 20 2a 2c 65 78 74 65 6e |tended96| *,exten|
|000007f0| 64 65 64 38 30 20 2a 29 | 3b 0d 09 76 6f 69 64 20 |ded80 *)|;..void |
|00000800| 78 38 30 74 6f 78 39 36 | 28 65 78 74 65 6e 64 65 |x80tox96|(extende|
|00000810| 64 38 30 20 2a 2c 65 78 | 74 65 6e 64 65 64 39 36 |d80 *,ex|tended96|
|00000820| 20 2a 29 3b 0d 23 65 6e | 64 69 66 0d 23 69 6e 63 | *);.#en|dif.#inc|
|00000830| 6c 75 64 65 20 3c 61 73 | 73 65 72 74 2e 68 3e 0d |lude <as|sert.h>.|
|00000840| 76 6f 69 64 20 6c 64 74 | 6f 78 38 30 20 28 6c 6f |void ldt|ox80 (lo|
|00000850| 6e 67 20 64 6f 75 62 6c | 65 20 2a 78 6c 2c 65 78 |ng doubl|e *xl,ex|
|00000860| 74 65 6e 64 65 64 38 30 | 20 2a 78 38 30 29 3b 0d |tended80| *x80);.|
|00000870| 76 6f 69 64 20 78 38 30 | 74 6f 6c 64 20 28 65 78 |void x80|told (ex|
|00000880| 74 65 6e 64 65 64 38 30 | 20 2a 78 38 30 2c 6c 6f |tended80| *x80,lo|
|00000890| 6e 67 20 64 6f 75 62 6c | 65 20 2a 78 6c 29 3b 0d |ng doubl|e *xl);.|
|000008a0| 6c 6f 6e 67 20 69 6e 74 | 20 66 70 63 6c 61 73 73 |long int| fpclass|
|000008b0| 69 66 79 28 64 6f 75 62 | 6c 65 20 78 29 3b 0d 0d |ify(doub|le x);..|
|000008c0| 76 6f 69 64 20 6c 64 74 | 6f 78 38 30 20 28 6c 6f |void ldt|ox80 (lo|
|000008d0| 6e 67 20 64 6f 75 62 6c | 65 20 2a 78 6c 2c 65 78 |ng doubl|e *xl,ex|
|000008e0| 74 65 6e 64 65 64 38 30 | 20 2a 78 38 30 29 0d 7b |tended80| *x80).{|
|000008f0| 0d 09 64 6f 75 62 6c 65 | 20 78 3b 0d 09 0d 09 73 |..double| x;....s|
|00000900| 77 69 74 63 68 28 73 69 | 7a 65 6f 66 28 6c 6f 6e |witch(si|zeof(lon|
|00000910| 67 20 64 6f 75 62 6c 65 | 29 29 7b 0d 09 63 61 73 |g double|)){..cas|
|00000920| 65 20 31 32 3a 0d 09 09 | 78 39 36 74 6f 78 38 30 |e 12:...|x96tox80|
|00000930| 28 28 65 78 74 65 6e 64 | 65 64 39 36 20 2a 29 78 |((extend|ed96 *)x|
|00000940| 6c 2c 78 38 30 29 3b 0d | 09 09 72 65 74 75 72 6e |l,x80);.|..return|
|00000950| 3b 0d 09 63 61 73 65 20 | 31 30 3a 0d 09 09 2a 78 |;..case |10:...*x|
|00000960| 38 30 3d 2a 28 65 78 74 | 65 6e 64 65 64 38 30 20 |80=*(ext|ended80 |
|00000970| 2a 29 78 6c 3b 0d 09 09 | 72 65 74 75 72 6e 3b 0d |*)xl;...|return;.|
|00000980| 09 64 65 66 61 75 6c 74 | 3a 0d 09 09 73 77 69 74 |.default|:...swit|
|00000990| 63 68 28 73 69 7a 65 6f | 66 28 64 6f 75 62 6c 65 |ch(sizeo|f(double|
|000009a0| 29 29 7b 0d 09 09 63 61 | 73 65 20 31 32 3a 0d 09 |)){...ca|se 12:..|
|000009b0| 09 09 78 3d 2a 78 6c 3b | 0d 09 09 09 78 39 36 74 |..x=*xl;|....x96t|
|000009c0| 6f 78 38 30 28 28 65 78 | 74 65 6e 64 65 64 39 36 |ox80((ex|tended96|
|000009d0| 20 2a 29 26 78 2c 78 38 | 30 29 3b 0d 09 09 09 62 | *)&x,x8|0);....b|
|000009e0| 72 65 61 6b 3b 0d 09 09 | 63 61 73 65 20 31 30 3a |reak;...|case 10:|
|000009f0| 0d 09 09 09 2a 28 64 6f | 75 62 6c 65 20 2a 29 78 |....*(do|uble *)x|
|00000a00| 38 30 3d 2a 78 6c 3b 0d | 09 09 09 62 72 65 61 6b |80=*xl;.|...break|
|00000a10| 3b 0d 09 09 64 65 66 61 | 75 6c 74 3a 0d 09 09 09 |;...defa|ult:....|
|00000a20| 61 73 73 65 72 74 28 30 | 29 3b 0d 09 09 7d 0d 09 |assert(0|);...}..|
|00000a30| 7d 0d 7d 0d 0d 76 6f 69 | 64 20 78 38 30 74 6f 6c |}.}..voi|d x80tol|
|00000a40| 64 20 28 65 78 74 65 6e | 64 65 64 38 30 20 2a 78 |d (exten|ded80 *x|
|00000a50| 38 30 2c 6c 6f 6e 67 20 | 64 6f 75 62 6c 65 20 2a |80,long |double *|
|00000a60| 78 6c 29 0d 7b 0d 09 64 | 6f 75 62 6c 65 20 78 3b |xl).{..d|ouble x;|
|00000a70| 0d 0d 09 73 77 69 74 63 | 68 28 73 69 7a 65 6f 66 |...switc|h(sizeof|
|00000a80| 28 6c 6f 6e 67 20 64 6f | 75 62 6c 65 29 29 7b 0d |(long do|uble)){.|
|00000a90| 09 63 61 73 65 20 31 32 | 3a 0d 09 09 78 38 30 74 |.case 12|:...x80t|
|00000aa0| 6f 78 39 36 28 78 38 30 | 2c 28 65 78 74 65 6e 64 |ox96(x80|,(extend|
|00000ab0| 65 64 39 36 20 2a 29 78 | 6c 29 3b 0d 09 09 62 72 |ed96 *)x|l);...br|
|00000ac0| 65 61 6b 3b 0d 09 63 61 | 73 65 20 31 30 3a 0d 09 |eak;..ca|se 10:..|
|00000ad0| 09 2a 78 6c 3d 2a 28 6c | 6f 6e 67 20 64 6f 75 62 |.*xl=*(l|ong doub|
|00000ae0| 6c 65 20 2a 29 78 38 30 | 3b 0d 09 09 62 72 65 61 |le *)x80|;...brea|
|00000af0| 6b 3b 0d 09 64 65 66 61 | 75 6c 74 3a 0d 09 09 73 |k;..defa|ult:...s|
|00000b00| 77 69 74 63 68 28 73 69 | 7a 65 6f 66 28 64 6f 75 |witch(si|zeof(dou|
|00000b10| 62 6c 65 29 29 7b 0d 09 | 09 63 61 73 65 20 31 32 |ble)){..|.case 12|
|00000b20| 3a 0d 09 09 09 78 38 30 | 74 6f 78 39 36 28 78 38 |:....x80|tox96(x8|
|00000b30| 30 2c 28 65 78 74 65 6e | 64 65 64 39 36 20 2a 29 |0,(exten|ded96 *)|
|00000b40| 26 78 29 3b 0d 09 09 09 | 2a 78 6c 3d 78 3b 0d 09 |&x);....|*xl=x;..|
|00000b50| 09 09 62 72 65 61 6b 3b | 0d 09 09 63 61 73 65 20 |..break;|...case |
|00000b60| 31 30 3a 0d 09 09 09 2a | 78 6c 3d 2a 28 64 6f 75 |10:....*|xl=*(dou|
|00000b70| 62 6c 65 20 2a 29 78 38 | 30 3b 0d 09 09 09 62 72 |ble *)x8|0;....br|
|00000b80| 65 61 6b 3b 0d 09 09 64 | 65 66 61 75 6c 74 3a 0d |eak;...d|efault:.|
|00000b90| 09 09 09 61 73 73 65 72 | 74 28 30 29 3b 0d 09 09 |...asser|t(0);...|
|00000ba0| 7d 0d 09 7d 0d 7d 0d 0d | 70 61 73 63 61 6c 20 76 |}..}.}..|pascal v|
|00000bb0| 6f 69 64 20 4d 79 43 6c | 61 73 73 45 78 74 65 6e |oid MyCl|assExten|
|00000bc0| 64 65 64 28 65 78 74 65 | 6e 64 65 64 38 30 20 2a |ded(exte|nded80 *|
|00000bd0| 2c 73 68 6f 72 74 20 2a | 29 20 3d 20 7b 20 30 78 |,short *|) = { 0x|
|00000be0| 33 46 33 43 2c 30 78 30 | 30 31 43 2c 30 78 41 39 |3F3C,0x0|01C,0xA9|
|00000bf0| 45 42 20 7d 3b 0d 0d 6c | 6f 6e 67 20 69 6e 74 20 |EB };..l|ong int |
|00000c00| 66 70 63 6c 61 73 73 69 | 66 79 28 64 6f 75 62 6c |fpclassi|fy(doubl|
|00000c10| 65 20 78 29 0d 7b 0d 09 | 73 68 6f 72 74 20 6e 3b |e x).{..|short n;|
|00000c20| 0d 09 65 78 74 65 6e 64 | 65 64 38 30 20 78 38 30 |..extend|ed80 x80|
|00000c30| 3b 0d 09 6c 6f 6e 67 20 | 64 6f 75 62 6c 65 20 78 |;..long |double x|
|00000c40| 6c 3b 0d 0d 09 78 6c 3d | 78 3b 0d 09 6c 64 74 6f |l;...xl=|x;..ldto|
|00000c50| 78 38 30 28 26 78 6c 2c | 26 78 38 30 29 3b 0d 09 |x80(&xl,|&x80);..|
|00000c60| 4d 79 43 6c 61 73 73 45 | 78 74 65 6e 64 65 64 28 |MyClassE|xtended(|
|00000c70| 26 78 38 30 2c 26 6e 29 | 3b 0d 09 72 65 74 75 72 |&x80,&n)|;..retur|
|00000c80| 6e 20 6e 3b 0d 7d 0d 0d | 23 65 6e 64 69 66 0d 00 |n n;.}..|#endif..|
|00000c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d00| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00000d10| 00 00 00 6c 66 66 ff ff | ff ff 00 6d 66 66 ff ff |...lff..|...mff..|
|00000d20| cc cc 00 6e 66 66 ff ff | 99 99 00 6f 66 66 ff ff |...nff..|...off..|
|00000d30| 04 66 70 2e 63 4b 02 00 | 00 00 54 45 58 54 43 57 |.fp.cK..|..TEXTCW|
|00000d40| 49 45 01 00 00 64 01 80 | 00 00 00 00 ad 67 00 00 |IE...d..|.....g..|
|00000d50| 00 00 54 45 58 54 43 57 | 49 45 01 00 00 64 01 80 |..TEXTCW|IE...d..|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 aa bc d0 f6 00 00 | 0c 0f 00 00 01 9a 99 99 |........|........|
|00000d80| cc cc 00 7a 66 66 99 99 | 99 99 00 7b 66 66 99 99 |...zff..|...{ff..|
|00000d90| 66 66 00 7c 66 66 99 99 | 33 33 00 7d 66 66 99 99 |ff.|ff..|33.}ff..|
|00000da0| 00 00 00 7e 66 66 66 66 | ff ff 00 7f 66 66 66 66 |...~ffff|....ffff|
|00000db0| cc cc 00 80 66 66 66 66 | 99 99 00 81 66 66 66 66 |....ffff|....ffff|
|00000dc0| 66 66 00 82 66 66 66 66 | 33 33 00 83 66 66 66 66 |ff..ffff|33..ffff|
|00000dd0| 00 00 00 84 66 66 33 33 | ff ff 00 85 66 66 33 33 |....ff33|....ff33|
|00000de0| cc cc 00 86 66 66 33 33 | 99 99 00 87 66 66 33 33 |....ff33|....ff33|
|00000df0| 66 66 00 88 66 66 33 33 | 33 33 00 89 66 66 33 33 |ff..ff33|33..ff33|
|00000e00| 00 00 00 04 00 01 00 01 | 00 00 00 48 00 09 4d 6f |........|...H..Mo|
|00000e10| 6e 61 63 6f 00 00 00 00 | 00 00 00 00 00 00 00 00 |naco....|........|
|00000e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 06 |........|........|
|00000e30| 00 04 00 2a 00 03 01 dd | 02 7d 00 3d 00 04 01 a0 |...*....|.}.=....|
|00000e40| 02 7c ac 56 5a ad 00 00 | 00 7b 00 00 00 7b 00 00 |.|.VZ...|.{...{..|
|00000e50| 00 00 00 00 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00000e60| 00 00 00 46 00 3d dd 1c | 2c 70 00 00 00 1c 00 46 |...F.=..|,p.....F|
|00000e70| 00 01 4d 57 42 42 00 00 | 00 12 4d 50 53 52 00 00 |..MWBB..|..MPSR..|
|00000e80| 00 1e 03 f0 ff ff 00 00 | 00 00 00 00 00 00 03 ed |........|........|
|00000e90| ff ff 00 00 00 08 00 3d | dc 2c 00 00 00 00 00 00 |.......=|.,......|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+