162306a36Sopenharmony_ci~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 262306a36Sopenharmony_ciMOTOROLA MICROPROCESSOR & MEMORY TECHNOLOGY GROUP 362306a36Sopenharmony_ciM68000 Hi-Performance Microprocessor Division 462306a36Sopenharmony_ciM68060 Software Package 562306a36Sopenharmony_ciProduction Release P1.00 -- October 10, 1994 662306a36Sopenharmony_ci 762306a36Sopenharmony_ciM68060 Software Package Copyright © 1993, 1994 Motorola Inc. All rights reserved. 862306a36Sopenharmony_ci 962306a36Sopenharmony_ciTHE SOFTWARE is provided on an "AS IS" basis and without warranty. 1062306a36Sopenharmony_ciTo the maximum extent permitted by applicable law, 1162306a36Sopenharmony_ciMOTOROLA DISCLAIMS ALL WARRANTIES WHETHER EXPRESS OR IMPLIED, 1262306a36Sopenharmony_ciINCLUDING IMPLIED WARRANTIES OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE 1362306a36Sopenharmony_ciand any warranty against infringement with regard to the SOFTWARE 1462306a36Sopenharmony_ci(INCLUDING ANY MODIFIED VERSIONS THEREOF) and any accompanying written materials. 1562306a36Sopenharmony_ci 1662306a36Sopenharmony_ciTo the maximum extent permitted by applicable law, 1762306a36Sopenharmony_ciIN NO EVENT SHALL MOTOROLA BE LIABLE FOR ANY DAMAGES WHATSOEVER 1862306a36Sopenharmony_ci(INCLUDING WITHOUT LIMITATION, DAMAGES FOR LOSS OF BUSINESS PROFITS, 1962306a36Sopenharmony_ciBUSINESS INTERRUPTION, LOSS OF BUSINESS INFORMATION, OR OTHER PECUNIARY LOSS) 2062306a36Sopenharmony_ciARISING OF THE USE OR INABILITY TO USE THE SOFTWARE. 2162306a36Sopenharmony_ciMotorola assumes no responsibility for the maintenance and support of the SOFTWARE. 2262306a36Sopenharmony_ci 2362306a36Sopenharmony_ciYou are hereby granted a copyright license to use, modify, and distribute the SOFTWARE 2462306a36Sopenharmony_ciso long as this entire notice is retained without alteration in any modified and/or 2562306a36Sopenharmony_ciredistributed versions, and that such modified versions are clearly identified as such. 2662306a36Sopenharmony_ciNo licenses are granted by implication, estoppel or otherwise under any patents 2762306a36Sopenharmony_cior trademarks of Motorola, Inc. 2862306a36Sopenharmony_ci~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 2962306a36Sopenharmony_ci############################################# 3062306a36Sopenharmony_ciset SREGS, -64 3162306a36Sopenharmony_ciset IREGS, -128 3262306a36Sopenharmony_ciset IFPREGS, -224 3362306a36Sopenharmony_ciset SFPREGS, -320 3462306a36Sopenharmony_ciset IFPCREGS, -332 3562306a36Sopenharmony_ciset SFPCREGS, -344 3662306a36Sopenharmony_ciset ICCR, -346 3762306a36Sopenharmony_ciset SCCR, -348 3862306a36Sopenharmony_ciset TESTCTR, -352 3962306a36Sopenharmony_ciset DATA, -384 4062306a36Sopenharmony_ci 4162306a36Sopenharmony_ci############################################# 4262306a36Sopenharmony_ciTESTTOP: 4362306a36Sopenharmony_ci bra.l _060TESTS_ 4462306a36Sopenharmony_ci short 0x0000 4562306a36Sopenharmony_ci 4662306a36Sopenharmony_ci bra.l _060TESTS_unimp 4762306a36Sopenharmony_ci short 0x0000 4862306a36Sopenharmony_ci 4962306a36Sopenharmony_ci bra.l _060TESTS_enable 5062306a36Sopenharmony_ci short 0x0000 5162306a36Sopenharmony_ci 5262306a36Sopenharmony_cistart_str: 5362306a36Sopenharmony_ci string "Testing 68060 FPSP started:\n" 5462306a36Sopenharmony_ci 5562306a36Sopenharmony_cistart_str_unimp: 5662306a36Sopenharmony_ci string "Testing 68060 FPSP unimplemented instruction started:\n" 5762306a36Sopenharmony_ci 5862306a36Sopenharmony_cistart_str_enable: 5962306a36Sopenharmony_ci string "Testing 68060 FPSP exception enabled started:\n" 6062306a36Sopenharmony_ci 6162306a36Sopenharmony_cipass_str: 6262306a36Sopenharmony_ci string "passed\n" 6362306a36Sopenharmony_ci 6462306a36Sopenharmony_cifail_str: 6562306a36Sopenharmony_ci string " failed\n" 6662306a36Sopenharmony_ci 6762306a36Sopenharmony_ci align 0x4 6862306a36Sopenharmony_cichk_test: 6962306a36Sopenharmony_ci tst.l %d0 7062306a36Sopenharmony_ci bne.b test_fail 7162306a36Sopenharmony_citest_pass: 7262306a36Sopenharmony_ci pea pass_str(%pc) 7362306a36Sopenharmony_ci bsr.l _print_str 7462306a36Sopenharmony_ci addq.l &0x4,%sp 7562306a36Sopenharmony_ci rts 7662306a36Sopenharmony_citest_fail: 7762306a36Sopenharmony_ci mov.l %d1,-(%sp) 7862306a36Sopenharmony_ci bsr.l _print_num 7962306a36Sopenharmony_ci addq.l &0x4,%sp 8062306a36Sopenharmony_ci 8162306a36Sopenharmony_ci pea fail_str(%pc) 8262306a36Sopenharmony_ci bsr.l _print_str 8362306a36Sopenharmony_ci addq.l &0x4,%sp 8462306a36Sopenharmony_ci rts 8562306a36Sopenharmony_ci 8662306a36Sopenharmony_ci############################################# 8762306a36Sopenharmony_ci_060TESTS_: 8862306a36Sopenharmony_ci link %a6,&-384 8962306a36Sopenharmony_ci 9062306a36Sopenharmony_ci movm.l &0x3f3c,-(%sp) 9162306a36Sopenharmony_ci fmovm.x &0xff,-(%sp) 9262306a36Sopenharmony_ci 9362306a36Sopenharmony_ci pea start_str(%pc) 9462306a36Sopenharmony_ci bsr.l _print_str 9562306a36Sopenharmony_ci addq.l &0x4,%sp 9662306a36Sopenharmony_ci 9762306a36Sopenharmony_ci### effadd 9862306a36Sopenharmony_ci clr.l TESTCTR(%a6) 9962306a36Sopenharmony_ci pea effadd_str(%pc) 10062306a36Sopenharmony_ci bsr.l _print_str 10162306a36Sopenharmony_ci addq.l &0x4,%sp 10262306a36Sopenharmony_ci 10362306a36Sopenharmony_ci bsr.l effadd_0 10462306a36Sopenharmony_ci 10562306a36Sopenharmony_ci bsr.l chk_test 10662306a36Sopenharmony_ci 10762306a36Sopenharmony_ci### unsupp 10862306a36Sopenharmony_ci clr.l TESTCTR(%a6) 10962306a36Sopenharmony_ci pea unsupp_str(%pc) 11062306a36Sopenharmony_ci bsr.l _print_str 11162306a36Sopenharmony_ci addq.l &0x4,%sp 11262306a36Sopenharmony_ci 11362306a36Sopenharmony_ci bsr.l unsupp_0 11462306a36Sopenharmony_ci 11562306a36Sopenharmony_ci bsr.l chk_test 11662306a36Sopenharmony_ci 11762306a36Sopenharmony_ci### ovfl non-maskable 11862306a36Sopenharmony_ci clr.l TESTCTR(%a6) 11962306a36Sopenharmony_ci pea ovfl_nm_str(%pc) 12062306a36Sopenharmony_ci bsr.l _print_str 12162306a36Sopenharmony_ci bsr.l ovfl_nm_0 12262306a36Sopenharmony_ci 12362306a36Sopenharmony_ci bsr.l chk_test 12462306a36Sopenharmony_ci 12562306a36Sopenharmony_ci### unfl non-maskable 12662306a36Sopenharmony_ci clr.l TESTCTR(%a6) 12762306a36Sopenharmony_ci pea unfl_nm_str(%pc) 12862306a36Sopenharmony_ci bsr.l _print_str 12962306a36Sopenharmony_ci bsr.l unfl_nm_0 13062306a36Sopenharmony_ci 13162306a36Sopenharmony_ci bsr.l chk_test 13262306a36Sopenharmony_ci 13362306a36Sopenharmony_ci movm.l (%sp)+,&0x3cfc 13462306a36Sopenharmony_ci fmovm.x (%sp)+,&0xff 13562306a36Sopenharmony_ci 13662306a36Sopenharmony_ci unlk %a6 13762306a36Sopenharmony_ci rts 13862306a36Sopenharmony_ci 13962306a36Sopenharmony_ci_060TESTS_unimp: 14062306a36Sopenharmony_ci link %a6,&-384 14162306a36Sopenharmony_ci 14262306a36Sopenharmony_ci movm.l &0x3f3c,-(%sp) 14362306a36Sopenharmony_ci fmovm.x &0xff,-(%sp) 14462306a36Sopenharmony_ci 14562306a36Sopenharmony_ci pea start_str_unimp(%pc) 14662306a36Sopenharmony_ci bsr.l _print_str 14762306a36Sopenharmony_ci addq.l &0x4,%sp 14862306a36Sopenharmony_ci 14962306a36Sopenharmony_ci### unimp 15062306a36Sopenharmony_ci clr.l TESTCTR(%a6) 15162306a36Sopenharmony_ci pea unimp_str(%pc) 15262306a36Sopenharmony_ci bsr.l _print_str 15362306a36Sopenharmony_ci addq.l &0x4,%sp 15462306a36Sopenharmony_ci 15562306a36Sopenharmony_ci bsr.l unimp_0 15662306a36Sopenharmony_ci 15762306a36Sopenharmony_ci bsr.l chk_test 15862306a36Sopenharmony_ci 15962306a36Sopenharmony_ci movm.l (%sp)+,&0x3cfc 16062306a36Sopenharmony_ci fmovm.x (%sp)+,&0xff 16162306a36Sopenharmony_ci 16262306a36Sopenharmony_ci unlk %a6 16362306a36Sopenharmony_ci rts 16462306a36Sopenharmony_ci 16562306a36Sopenharmony_ci_060TESTS_enable: 16662306a36Sopenharmony_ci link %a6,&-384 16762306a36Sopenharmony_ci 16862306a36Sopenharmony_ci movm.l &0x3f3c,-(%sp) 16962306a36Sopenharmony_ci fmovm.x &0xff,-(%sp) 17062306a36Sopenharmony_ci 17162306a36Sopenharmony_ci pea start_str_enable(%pc) 17262306a36Sopenharmony_ci bsr.l _print_str 17362306a36Sopenharmony_ci addq.l &0x4,%sp 17462306a36Sopenharmony_ci 17562306a36Sopenharmony_ci### snan 17662306a36Sopenharmony_ci clr.l TESTCTR(%a6) 17762306a36Sopenharmony_ci pea snan_str(%pc) 17862306a36Sopenharmony_ci bsr.l _print_str 17962306a36Sopenharmony_ci bsr.l snan_0 18062306a36Sopenharmony_ci 18162306a36Sopenharmony_ci bsr.l chk_test 18262306a36Sopenharmony_ci 18362306a36Sopenharmony_ci### operr 18462306a36Sopenharmony_ci clr.l TESTCTR(%a6) 18562306a36Sopenharmony_ci pea operr_str(%pc) 18662306a36Sopenharmony_ci bsr.l _print_str 18762306a36Sopenharmony_ci bsr.l operr_0 18862306a36Sopenharmony_ci 18962306a36Sopenharmony_ci bsr.l chk_test 19062306a36Sopenharmony_ci 19162306a36Sopenharmony_ci### ovfl 19262306a36Sopenharmony_ci clr.l TESTCTR(%a6) 19362306a36Sopenharmony_ci pea ovfl_str(%pc) 19462306a36Sopenharmony_ci bsr.l _print_str 19562306a36Sopenharmony_ci bsr.l ovfl_0 19662306a36Sopenharmony_ci 19762306a36Sopenharmony_ci bsr.l chk_test 19862306a36Sopenharmony_ci 19962306a36Sopenharmony_ci### unfl 20062306a36Sopenharmony_ci clr.l TESTCTR(%a6) 20162306a36Sopenharmony_ci pea unfl_str(%pc) 20262306a36Sopenharmony_ci bsr.l _print_str 20362306a36Sopenharmony_ci bsr.l unfl_0 20462306a36Sopenharmony_ci 20562306a36Sopenharmony_ci bsr.l chk_test 20662306a36Sopenharmony_ci 20762306a36Sopenharmony_ci### dz 20862306a36Sopenharmony_ci clr.l TESTCTR(%a6) 20962306a36Sopenharmony_ci pea dz_str(%pc) 21062306a36Sopenharmony_ci bsr.l _print_str 21162306a36Sopenharmony_ci bsr.l dz_0 21262306a36Sopenharmony_ci 21362306a36Sopenharmony_ci bsr.l chk_test 21462306a36Sopenharmony_ci 21562306a36Sopenharmony_ci### inexact 21662306a36Sopenharmony_ci clr.l TESTCTR(%a6) 21762306a36Sopenharmony_ci pea inex_str(%pc) 21862306a36Sopenharmony_ci bsr.l _print_str 21962306a36Sopenharmony_ci bsr.l inex_0 22062306a36Sopenharmony_ci 22162306a36Sopenharmony_ci bsr.l chk_test 22262306a36Sopenharmony_ci 22362306a36Sopenharmony_ci movm.l (%sp)+,&0x3cfc 22462306a36Sopenharmony_ci fmovm.x (%sp)+,&0xff 22562306a36Sopenharmony_ci 22662306a36Sopenharmony_ci unlk %a6 22762306a36Sopenharmony_ci rts 22862306a36Sopenharmony_ci 22962306a36Sopenharmony_ci############################################# 23062306a36Sopenharmony_ci############################################# 23162306a36Sopenharmony_ci 23262306a36Sopenharmony_ciunimp_str: 23362306a36Sopenharmony_ci string "\tUnimplemented FP instructions..." 23462306a36Sopenharmony_ci 23562306a36Sopenharmony_ci align 0x4 23662306a36Sopenharmony_ciunimp_0: 23762306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 23862306a36Sopenharmony_ci 23962306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 24062306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 24162306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 24262306a36Sopenharmony_ci 24362306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 24462306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 24562306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 24662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 24762306a36Sopenharmony_ci 24862306a36Sopenharmony_ci mov.l &0x40000000,DATA+0x0(%a6) 24962306a36Sopenharmony_ci mov.l &0xc90fdaa2,DATA+0x4(%a6) 25062306a36Sopenharmony_ci mov.l &0x2168c235,DATA+0x8(%a6) 25162306a36Sopenharmony_ci 25262306a36Sopenharmony_ci mov.w &0x0000,%cc 25362306a36Sopenharmony_ciunimp_0_pc: 25462306a36Sopenharmony_ci fsin.x DATA(%a6),%fp0 25562306a36Sopenharmony_ci 25662306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 25762306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 25862306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 25962306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 26062306a36Sopenharmony_ci 26162306a36Sopenharmony_ci mov.l &0xbfbf0000,IFPREGS+0x0(%a6) 26262306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 26362306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 26462306a36Sopenharmony_ci mov.l &0x08000208,IFPCREGS+0x4(%a6) 26562306a36Sopenharmony_ci lea unimp_0_pc(%pc),%a0 26662306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 26762306a36Sopenharmony_ci 26862306a36Sopenharmony_ci bsr.l chkregs 26962306a36Sopenharmony_ci tst.b %d0 27062306a36Sopenharmony_ci bne.l error 27162306a36Sopenharmony_ci 27262306a36Sopenharmony_ci bsr.l chkfpregs 27362306a36Sopenharmony_ci tst.b %d0 27462306a36Sopenharmony_ci bne.l error 27562306a36Sopenharmony_ci 27662306a36Sopenharmony_ciunimp_1: 27762306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 27862306a36Sopenharmony_ci 27962306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 28062306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 28162306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 28262306a36Sopenharmony_ci 28362306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 28462306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 28562306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 28662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 28762306a36Sopenharmony_ci 28862306a36Sopenharmony_ci mov.l &0x3ffe0000,DATA+0x0(%a6) 28962306a36Sopenharmony_ci mov.l &0xc90fdaa2,DATA+0x4(%a6) 29062306a36Sopenharmony_ci mov.l &0x2168c235,DATA+0x8(%a6) 29162306a36Sopenharmony_ci 29262306a36Sopenharmony_ci mov.w &0x0000,%cc 29362306a36Sopenharmony_ciunimp_1_pc: 29462306a36Sopenharmony_ci ftan.x DATA(%a6),%fp0 29562306a36Sopenharmony_ci 29662306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 29762306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 29862306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 29962306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 30062306a36Sopenharmony_ci 30162306a36Sopenharmony_ci mov.l &0x3fff0000,IFPREGS+0x0(%a6) 30262306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 30362306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 30462306a36Sopenharmony_ci mov.l &0x00000208,IFPCREGS+0x4(%a6) 30562306a36Sopenharmony_ci lea unimp_1_pc(%pc),%a0 30662306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 30762306a36Sopenharmony_ci 30862306a36Sopenharmony_ci bsr.l chkregs 30962306a36Sopenharmony_ci tst.b %d0 31062306a36Sopenharmony_ci bne.l error 31162306a36Sopenharmony_ci 31262306a36Sopenharmony_ci bsr.l chkfpregs 31362306a36Sopenharmony_ci tst.b %d0 31462306a36Sopenharmony_ci bne.l error 31562306a36Sopenharmony_ci 31662306a36Sopenharmony_ci# fmovecr 31762306a36Sopenharmony_ciunimp_2: 31862306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 31962306a36Sopenharmony_ci 32062306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 32162306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 32262306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 32362306a36Sopenharmony_ci 32462306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 32562306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 32662306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 32762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 32862306a36Sopenharmony_ci 32962306a36Sopenharmony_ci mov.w &0x0000,%cc 33062306a36Sopenharmony_ciunimp_2_pc: 33162306a36Sopenharmony_ci fmovcr.x &0x31,%fp0 33262306a36Sopenharmony_ci 33362306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 33462306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 33562306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 33662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 33762306a36Sopenharmony_ci 33862306a36Sopenharmony_ci mov.l &0x40000000,IFPREGS+0x0(%a6) 33962306a36Sopenharmony_ci mov.l &0x935d8ddd,IFPREGS+0x4(%a6) 34062306a36Sopenharmony_ci mov.l &0xaaa8ac17,IFPREGS+0x8(%a6) 34162306a36Sopenharmony_ci mov.l &0x00000208,IFPCREGS+0x4(%a6) 34262306a36Sopenharmony_ci lea unimp_2_pc(%pc),%a0 34362306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 34462306a36Sopenharmony_ci 34562306a36Sopenharmony_ci bsr.l chkregs 34662306a36Sopenharmony_ci tst.b %d0 34762306a36Sopenharmony_ci bne.l error 34862306a36Sopenharmony_ci 34962306a36Sopenharmony_ci bsr.l chkfpregs 35062306a36Sopenharmony_ci tst.b %d0 35162306a36Sopenharmony_ci bne.l error 35262306a36Sopenharmony_ci 35362306a36Sopenharmony_ci# fscc 35462306a36Sopenharmony_ciunimp_3: 35562306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 35662306a36Sopenharmony_ci 35762306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 35862306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 35962306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 36062306a36Sopenharmony_ci 36162306a36Sopenharmony_ci fmov.l &0x0f000000,%fpsr 36262306a36Sopenharmony_ci mov.l &0x00,%d7 36362306a36Sopenharmony_ci 36462306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 36562306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 36662306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 36762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 36862306a36Sopenharmony_ci 36962306a36Sopenharmony_ci mov.w &0x0000,%cc 37062306a36Sopenharmony_ciunimp_3_pc: 37162306a36Sopenharmony_ci fsgt %d7 37262306a36Sopenharmony_ci 37362306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 37462306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 37562306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 37662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 37762306a36Sopenharmony_ci mov.l &0x0f008080,IFPCREGS+0x4(%a6) 37862306a36Sopenharmony_ci lea unimp_3_pc(%pc),%a0 37962306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 38062306a36Sopenharmony_ci 38162306a36Sopenharmony_ci bsr.l chkregs 38262306a36Sopenharmony_ci tst.b %d0 38362306a36Sopenharmony_ci bne.l error 38462306a36Sopenharmony_ci 38562306a36Sopenharmony_ci bsr.l chkfpregs 38662306a36Sopenharmony_ci tst.b %d0 38762306a36Sopenharmony_ci bne.l error 38862306a36Sopenharmony_ci 38962306a36Sopenharmony_ci# fdbcc 39062306a36Sopenharmony_ciunimp_4: 39162306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 39262306a36Sopenharmony_ci 39362306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 39462306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 39562306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 39662306a36Sopenharmony_ci 39762306a36Sopenharmony_ci fmov.l &0x0f000000,%fpsr 39862306a36Sopenharmony_ci mov.l &0x2,%d7 39962306a36Sopenharmony_ci 40062306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 40162306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 40262306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 40362306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 40462306a36Sopenharmony_ci 40562306a36Sopenharmony_ci mov.w &0x0000,%cc 40662306a36Sopenharmony_ciunimp_4_pc: 40762306a36Sopenharmony_ci fdbgt.w %d7,unimp_4_pc 40862306a36Sopenharmony_ci 40962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 41062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 41162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 41262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 41362306a36Sopenharmony_ci mov.w &0xffff,IREGS+28+2(%a6) 41462306a36Sopenharmony_ci mov.l &0x0f008080,IFPCREGS+0x4(%a6) 41562306a36Sopenharmony_ci lea unimp_4_pc(%pc),%a0 41662306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 41762306a36Sopenharmony_ci 41862306a36Sopenharmony_ci bsr.l chkregs 41962306a36Sopenharmony_ci tst.b %d0 42062306a36Sopenharmony_ci bne.l error 42162306a36Sopenharmony_ci 42262306a36Sopenharmony_ci bsr.l chkfpregs 42362306a36Sopenharmony_ci tst.b %d0 42462306a36Sopenharmony_ci bne.l error 42562306a36Sopenharmony_ci 42662306a36Sopenharmony_ci# ftrapcc 42762306a36Sopenharmony_ciunimp_5: 42862306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 42962306a36Sopenharmony_ci 43062306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 43162306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 43262306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 43362306a36Sopenharmony_ci 43462306a36Sopenharmony_ci fmov.l &0x0f000000,%fpsr 43562306a36Sopenharmony_ci 43662306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 43762306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 43862306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 43962306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 44062306a36Sopenharmony_ci 44162306a36Sopenharmony_ci mov.w &0x0000,%cc 44262306a36Sopenharmony_ciunimp_5_pc: 44362306a36Sopenharmony_ci ftpgt.l &0xabcdef01 44462306a36Sopenharmony_ci 44562306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 44662306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 44762306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 44862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 44962306a36Sopenharmony_ci mov.l &0x0f008080,IFPCREGS+0x4(%a6) 45062306a36Sopenharmony_ci lea unimp_5_pc(%pc),%a0 45162306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 45262306a36Sopenharmony_ci 45362306a36Sopenharmony_ci bsr.l chkregs 45462306a36Sopenharmony_ci tst.b %d0 45562306a36Sopenharmony_ci bne.l error 45662306a36Sopenharmony_ci 45762306a36Sopenharmony_ci bsr.l chkfpregs 45862306a36Sopenharmony_ci tst.b %d0 45962306a36Sopenharmony_ci bne.l error 46062306a36Sopenharmony_ci 46162306a36Sopenharmony_ci clr.l %d0 46262306a36Sopenharmony_ci rts 46362306a36Sopenharmony_ci 46462306a36Sopenharmony_ci############################################# 46562306a36Sopenharmony_ci 46662306a36Sopenharmony_cieffadd_str: 46762306a36Sopenharmony_ci string "\tUnimplemented <ea>..." 46862306a36Sopenharmony_ci 46962306a36Sopenharmony_ci align 0x4 47062306a36Sopenharmony_cieffadd_0: 47162306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 47262306a36Sopenharmony_ci 47362306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 47462306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 47562306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 47662306a36Sopenharmony_ci 47762306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 47862306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 47962306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 48062306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 48162306a36Sopenharmony_ci 48262306a36Sopenharmony_ci fmov.b &0x2,%fp0 48362306a36Sopenharmony_ci 48462306a36Sopenharmony_ci mov.w &0x0000,%cc 48562306a36Sopenharmony_cieffadd_0_pc: 48662306a36Sopenharmony_ci fmul.x &0xc00000008000000000000000,%fp0 48762306a36Sopenharmony_ci 48862306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 48962306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 49062306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 49162306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 49262306a36Sopenharmony_ci 49362306a36Sopenharmony_ci mov.l &0xc0010000,IFPREGS+0x0(%a6) 49462306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 49562306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 49662306a36Sopenharmony_ci mov.l &0x08000000,IFPCREGS+0x4(%a6) 49762306a36Sopenharmony_ci lea effadd_0_pc(%pc),%a0 49862306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 49962306a36Sopenharmony_ci 50062306a36Sopenharmony_ci bsr.l chkregs 50162306a36Sopenharmony_ci tst.b %d0 50262306a36Sopenharmony_ci bne.l error 50362306a36Sopenharmony_ci 50462306a36Sopenharmony_ci bsr.l chkfpregs 50562306a36Sopenharmony_ci tst.b %d0 50662306a36Sopenharmony_ci bne.l error 50762306a36Sopenharmony_ci 50862306a36Sopenharmony_cieffadd_1: 50962306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 51062306a36Sopenharmony_ci 51162306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 51262306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 51362306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 51462306a36Sopenharmony_ci 51562306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 51662306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 51762306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 51862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 51962306a36Sopenharmony_ci 52062306a36Sopenharmony_ci mov.w &0x0000,%cc 52162306a36Sopenharmony_cieffadd_1_pc: 52262306a36Sopenharmony_ci fabs.p &0xc12300012345678912345678,%fp0 52362306a36Sopenharmony_ci 52462306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 52562306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 52662306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 52762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 52862306a36Sopenharmony_ci 52962306a36Sopenharmony_ci mov.l &0x3e660000,IFPREGS+0x0(%a6) 53062306a36Sopenharmony_ci mov.l &0xd0ed23e8,IFPREGS+0x4(%a6) 53162306a36Sopenharmony_ci mov.l &0xd14035bc,IFPREGS+0x8(%a6) 53262306a36Sopenharmony_ci mov.l &0x00000108,IFPCREGS+0x4(%a6) 53362306a36Sopenharmony_ci lea effadd_1_pc(%pc),%a0 53462306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 53562306a36Sopenharmony_ci 53662306a36Sopenharmony_ci bsr.l chkregs 53762306a36Sopenharmony_ci tst.b %d0 53862306a36Sopenharmony_ci bne.l error 53962306a36Sopenharmony_ci 54062306a36Sopenharmony_ci bsr.l chkfpregs 54162306a36Sopenharmony_ci tst.b %d0 54262306a36Sopenharmony_ci bne.l error 54362306a36Sopenharmony_ci 54462306a36Sopenharmony_cifmovml_0: 54562306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 54662306a36Sopenharmony_ci 54762306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 54862306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 54962306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 55062306a36Sopenharmony_ci 55162306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 55262306a36Sopenharmony_ci mov.w &0x0000,%cc 55362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 55462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 55562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 55662306a36Sopenharmony_ci 55762306a36Sopenharmony_ci fmovm.l &0xffffffffffffffff,%fpcr,%fpsr 55862306a36Sopenharmony_ci 55962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 56062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 56162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 56262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 56362306a36Sopenharmony_ci mov.l &0x0000fff0,IFPCREGS+0x0(%a6) 56462306a36Sopenharmony_ci mov.l &0x0ffffff8,IFPCREGS+0x4(%a6) 56562306a36Sopenharmony_ci 56662306a36Sopenharmony_ci bsr.l chkregs 56762306a36Sopenharmony_ci tst.b %d0 56862306a36Sopenharmony_ci bne.l error 56962306a36Sopenharmony_ci 57062306a36Sopenharmony_ci bsr.l chkfpregs 57162306a36Sopenharmony_ci tst.b %d0 57262306a36Sopenharmony_ci bne.l error 57362306a36Sopenharmony_ci 57462306a36Sopenharmony_cifmovml_1: 57562306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 57662306a36Sopenharmony_ci 57762306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 57862306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 57962306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 58062306a36Sopenharmony_ci 58162306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 58262306a36Sopenharmony_ci mov.w &0x0000,%cc 58362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 58462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 58562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 58662306a36Sopenharmony_ci 58762306a36Sopenharmony_ci fmovm.l &0xffffffffffffffff,%fpcr,%fpiar 58862306a36Sopenharmony_ci 58962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 59062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 59162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 59262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 59362306a36Sopenharmony_ci mov.l &0x0000fff0,IFPCREGS+0x0(%a6) 59462306a36Sopenharmony_ci mov.l &0xffffffff,IFPCREGS+0x8(%a6) 59562306a36Sopenharmony_ci 59662306a36Sopenharmony_ci bsr.l chkregs 59762306a36Sopenharmony_ci tst.b %d0 59862306a36Sopenharmony_ci bne.l error 59962306a36Sopenharmony_ci 60062306a36Sopenharmony_ci bsr.l chkfpregs 60162306a36Sopenharmony_ci tst.b %d0 60262306a36Sopenharmony_ci bne.l error 60362306a36Sopenharmony_ci 60462306a36Sopenharmony_cifmovml_2: 60562306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 60662306a36Sopenharmony_ci 60762306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 60862306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 60962306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 61062306a36Sopenharmony_ci 61162306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 61262306a36Sopenharmony_ci mov.w &0x0000,%cc 61362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 61462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 61562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 61662306a36Sopenharmony_ci 61762306a36Sopenharmony_ci fmovm.l &0xffffffffffffffff,%fpsr,%fpiar 61862306a36Sopenharmony_ci 61962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 62062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 62162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 62262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 62362306a36Sopenharmony_ci mov.l &0x0ffffff8,IFPCREGS+0x4(%a6) 62462306a36Sopenharmony_ci mov.l &0xffffffff,IFPCREGS+0x8(%a6) 62562306a36Sopenharmony_ci 62662306a36Sopenharmony_ci bsr.l chkregs 62762306a36Sopenharmony_ci tst.b %d0 62862306a36Sopenharmony_ci bne.l error 62962306a36Sopenharmony_ci 63062306a36Sopenharmony_ci bsr.l chkfpregs 63162306a36Sopenharmony_ci tst.b %d0 63262306a36Sopenharmony_ci bne.l error 63362306a36Sopenharmony_ci 63462306a36Sopenharmony_cifmovml_3: 63562306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 63662306a36Sopenharmony_ci 63762306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 63862306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 63962306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 64062306a36Sopenharmony_ci 64162306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 64262306a36Sopenharmony_ci mov.w &0x0000,%cc 64362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 64462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 64562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 64662306a36Sopenharmony_ci 64762306a36Sopenharmony_ci fmovm.l &0xffffffffffffffffffffffff,%fpcr,%fpsr,%fpiar 64862306a36Sopenharmony_ci 64962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 65062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 65162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 65262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 65362306a36Sopenharmony_ci mov.l &0x0000fff0,IFPCREGS+0x0(%a6) 65462306a36Sopenharmony_ci mov.l &0x0ffffff8,IFPCREGS+0x4(%a6) 65562306a36Sopenharmony_ci mov.l &0xffffffff,IFPCREGS+0x8(%a6) 65662306a36Sopenharmony_ci 65762306a36Sopenharmony_ci bsr.l chkregs 65862306a36Sopenharmony_ci tst.b %d0 65962306a36Sopenharmony_ci bne.l error 66062306a36Sopenharmony_ci 66162306a36Sopenharmony_ci bsr.l chkfpregs 66262306a36Sopenharmony_ci tst.b %d0 66362306a36Sopenharmony_ci bne.l error 66462306a36Sopenharmony_ci 66562306a36Sopenharmony_ci# fmovmx dynamic 66662306a36Sopenharmony_cifmovmx_0: 66762306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 66862306a36Sopenharmony_ci 66962306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 67062306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 67162306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 67262306a36Sopenharmony_ci 67362306a36Sopenharmony_ci fmov.b &0x1,%fp0 67462306a36Sopenharmony_ci fmov.b &0x2,%fp1 67562306a36Sopenharmony_ci fmov.b &0x3,%fp2 67662306a36Sopenharmony_ci fmov.b &0x4,%fp3 67762306a36Sopenharmony_ci fmov.b &0x5,%fp4 67862306a36Sopenharmony_ci fmov.b &0x6,%fp5 67962306a36Sopenharmony_ci fmov.b &0x7,%fp6 68062306a36Sopenharmony_ci fmov.b &0x8,%fp7 68162306a36Sopenharmony_ci 68262306a36Sopenharmony_ci fmov.l &0x0,%fpiar 68362306a36Sopenharmony_ci mov.l &0xffffffaa,%d0 68462306a36Sopenharmony_ci 68562306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 68662306a36Sopenharmony_ci movm.l &0xffff,IREGS(%a6) 68762306a36Sopenharmony_ci 68862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 68962306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 69062306a36Sopenharmony_ci 69162306a36Sopenharmony_ci mov.w &0x0000,%cc 69262306a36Sopenharmony_ci 69362306a36Sopenharmony_ci fmovm.x %d0,-(%sp) 69462306a36Sopenharmony_ci 69562306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 69662306a36Sopenharmony_ci 69762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 69862306a36Sopenharmony_ci 69962306a36Sopenharmony_ci fmov.s &0x7f800000,%fp1 70062306a36Sopenharmony_ci fmov.s &0x7f800000,%fp3 70162306a36Sopenharmony_ci fmov.s &0x7f800000,%fp5 70262306a36Sopenharmony_ci fmov.s &0x7f800000,%fp7 70362306a36Sopenharmony_ci 70462306a36Sopenharmony_ci fmov.x (%sp)+,%fp1 70562306a36Sopenharmony_ci fmov.x (%sp)+,%fp3 70662306a36Sopenharmony_ci fmov.x (%sp)+,%fp5 70762306a36Sopenharmony_ci fmov.x (%sp)+,%fp7 70862306a36Sopenharmony_ci 70962306a36Sopenharmony_ci movm.l &0xffff,SREGS(%a6) 71062306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 71162306a36Sopenharmony_ci 71262306a36Sopenharmony_ci bsr.l chkregs 71362306a36Sopenharmony_ci tst.b %d0 71462306a36Sopenharmony_ci bne.l error 71562306a36Sopenharmony_ci 71662306a36Sopenharmony_ci bsr.l chkfpregs 71762306a36Sopenharmony_ci tst.b %d0 71862306a36Sopenharmony_ci bne.l error 71962306a36Sopenharmony_ci 72062306a36Sopenharmony_cifmovmx_1: 72162306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 72262306a36Sopenharmony_ci 72362306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 72462306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 72562306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 72662306a36Sopenharmony_ci 72762306a36Sopenharmony_ci fmov.b &0x1,%fp0 72862306a36Sopenharmony_ci fmov.b &0x2,%fp1 72962306a36Sopenharmony_ci fmov.b &0x3,%fp2 73062306a36Sopenharmony_ci fmov.b &0x4,%fp3 73162306a36Sopenharmony_ci fmov.b &0x5,%fp4 73262306a36Sopenharmony_ci fmov.b &0x6,%fp5 73362306a36Sopenharmony_ci fmov.b &0x7,%fp6 73462306a36Sopenharmony_ci fmov.b &0x8,%fp7 73562306a36Sopenharmony_ci 73662306a36Sopenharmony_ci fmov.x %fp6,-(%sp) 73762306a36Sopenharmony_ci fmov.x %fp4,-(%sp) 73862306a36Sopenharmony_ci fmov.x %fp2,-(%sp) 73962306a36Sopenharmony_ci fmov.x %fp0,-(%sp) 74062306a36Sopenharmony_ci 74162306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 74262306a36Sopenharmony_ci 74362306a36Sopenharmony_ci fmov.s &0x7f800000,%fp6 74462306a36Sopenharmony_ci fmov.s &0x7f800000,%fp4 74562306a36Sopenharmony_ci fmov.s &0x7f800000,%fp2 74662306a36Sopenharmony_ci fmov.s &0x7f800000,%fp0 74762306a36Sopenharmony_ci 74862306a36Sopenharmony_ci fmov.l &0x0,%fpiar 74962306a36Sopenharmony_ci fmov.l &0x0,%fpsr 75062306a36Sopenharmony_ci mov.l &0xffffffaa,%d0 75162306a36Sopenharmony_ci 75262306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 75362306a36Sopenharmony_ci movm.l &0xffff,IREGS(%a6) 75462306a36Sopenharmony_ci 75562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 75662306a36Sopenharmony_ci 75762306a36Sopenharmony_ci mov.w &0x0000,%cc 75862306a36Sopenharmony_ci 75962306a36Sopenharmony_ci fmovm.x (%sp)+,%d0 76062306a36Sopenharmony_ci 76162306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 76262306a36Sopenharmony_ci 76362306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 76462306a36Sopenharmony_ci 76562306a36Sopenharmony_ci movm.l &0xffff,SREGS(%a6) 76662306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 76762306a36Sopenharmony_ci 76862306a36Sopenharmony_ci bsr.l chkregs 76962306a36Sopenharmony_ci tst.b %d0 77062306a36Sopenharmony_ci bne.l error 77162306a36Sopenharmony_ci 77262306a36Sopenharmony_ci bsr.l chkfpregs 77362306a36Sopenharmony_ci tst.b %d0 77462306a36Sopenharmony_ci bne.l error 77562306a36Sopenharmony_ci 77662306a36Sopenharmony_cifmovmx_2: 77762306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 77862306a36Sopenharmony_ci 77962306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 78062306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 78162306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 78262306a36Sopenharmony_ci 78362306a36Sopenharmony_ci fmov.b &0x1,%fp0 78462306a36Sopenharmony_ci fmov.b &0x2,%fp1 78562306a36Sopenharmony_ci fmov.b &0x3,%fp2 78662306a36Sopenharmony_ci fmov.b &0x4,%fp3 78762306a36Sopenharmony_ci fmov.b &0x5,%fp4 78862306a36Sopenharmony_ci fmov.b &0x6,%fp5 78962306a36Sopenharmony_ci fmov.b &0x7,%fp6 79062306a36Sopenharmony_ci fmov.b &0x8,%fp7 79162306a36Sopenharmony_ci 79262306a36Sopenharmony_ci fmov.l &0x0,%fpiar 79362306a36Sopenharmony_ci mov.l &0xffffff00,%d0 79462306a36Sopenharmony_ci 79562306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 79662306a36Sopenharmony_ci movm.l &0xffff,IREGS(%a6) 79762306a36Sopenharmony_ci 79862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 79962306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 80062306a36Sopenharmony_ci 80162306a36Sopenharmony_ci mov.w &0x0000,%cc 80262306a36Sopenharmony_ci 80362306a36Sopenharmony_ci fmovm.x %d0,-(%sp) 80462306a36Sopenharmony_ci 80562306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 80662306a36Sopenharmony_ci 80762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 80862306a36Sopenharmony_ci 80962306a36Sopenharmony_ci movm.l &0xffff,SREGS(%a6) 81062306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 81162306a36Sopenharmony_ci 81262306a36Sopenharmony_ci bsr.l chkregs 81362306a36Sopenharmony_ci tst.b %d0 81462306a36Sopenharmony_ci bne.l error 81562306a36Sopenharmony_ci 81662306a36Sopenharmony_ci bsr.l chkfpregs 81762306a36Sopenharmony_ci tst.b %d0 81862306a36Sopenharmony_ci bne.l error 81962306a36Sopenharmony_ci 82062306a36Sopenharmony_ci clr.l %d0 82162306a36Sopenharmony_ci rts 82262306a36Sopenharmony_ci 82362306a36Sopenharmony_ci########################################################### 82462306a36Sopenharmony_ci 82562306a36Sopenharmony_ci# This test will take a non-maskable overflow directly. 82662306a36Sopenharmony_ciovfl_nm_str: 82762306a36Sopenharmony_ci string "\tNon-maskable overflow..." 82862306a36Sopenharmony_ci 82962306a36Sopenharmony_ci align 0x4 83062306a36Sopenharmony_ciovfl_nm_0: 83162306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 83262306a36Sopenharmony_ci 83362306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 83462306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 83562306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 83662306a36Sopenharmony_ci 83762306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 83862306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 83962306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 84062306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 84162306a36Sopenharmony_ci 84262306a36Sopenharmony_ci fmov.b &0x2,%fp0 84362306a36Sopenharmony_ci mov.l &0x7ffe0000,DATA+0x0(%a6) 84462306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 84562306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 84662306a36Sopenharmony_ci 84762306a36Sopenharmony_ci mov.w &0x0000,%cc 84862306a36Sopenharmony_ciovfl_nm_0_pc: 84962306a36Sopenharmony_ci fmul.x DATA(%a6),%fp0 85062306a36Sopenharmony_ci 85162306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 85262306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 85362306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 85462306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 85562306a36Sopenharmony_ci 85662306a36Sopenharmony_ci mov.l &0x7fff0000,IFPREGS+0x0(%a6) 85762306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x4(%a6) 85862306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 85962306a36Sopenharmony_ci mov.l &0x02001048,IFPCREGS+0x4(%a6) 86062306a36Sopenharmony_ci lea ovfl_nm_0_pc(%pc),%a0 86162306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 86262306a36Sopenharmony_ci 86362306a36Sopenharmony_ci bsr.l chkregs 86462306a36Sopenharmony_ci tst.b %d0 86562306a36Sopenharmony_ci bne.l error 86662306a36Sopenharmony_ci 86762306a36Sopenharmony_ci bsr.l chkfpregs 86862306a36Sopenharmony_ci tst.b %d0 86962306a36Sopenharmony_ci bne.l error 87062306a36Sopenharmony_ci 87162306a36Sopenharmony_ci clr.l %d0 87262306a36Sopenharmony_ci rts 87362306a36Sopenharmony_ci 87462306a36Sopenharmony_ci########################################################### 87562306a36Sopenharmony_ci 87662306a36Sopenharmony_ci# This test will take an overflow directly. 87762306a36Sopenharmony_ciovfl_str: 87862306a36Sopenharmony_ci string "\tEnabled overflow..." 87962306a36Sopenharmony_ci 88062306a36Sopenharmony_ci align 0x4 88162306a36Sopenharmony_ciovfl_0: 88262306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 88362306a36Sopenharmony_ci 88462306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 88562306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 88662306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 88762306a36Sopenharmony_ci 88862306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 88962306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 89062306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 89162306a36Sopenharmony_ci fmov.l &0x00001000,%fpcr 89262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 89362306a36Sopenharmony_ci 89462306a36Sopenharmony_ci fmov.b &0x2,%fp0 89562306a36Sopenharmony_ci mov.l &0x7ffe0000,DATA+0x0(%a6) 89662306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 89762306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 89862306a36Sopenharmony_ci 89962306a36Sopenharmony_ci mov.w &0x0000,%cc 90062306a36Sopenharmony_ciovfl_0_pc: 90162306a36Sopenharmony_ci fmul.x DATA(%a6),%fp0 90262306a36Sopenharmony_ci 90362306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 90462306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 90562306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 90662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 90762306a36Sopenharmony_ci 90862306a36Sopenharmony_ci mov.l &0x7fff0000,IFPREGS+0x0(%a6) 90962306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x4(%a6) 91062306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 91162306a36Sopenharmony_ci mov.l &0x02001048,IFPCREGS+0x4(%a6) 91262306a36Sopenharmony_ci lea ovfl_0_pc(%pc),%a0 91362306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 91462306a36Sopenharmony_ci 91562306a36Sopenharmony_ci bsr.l chkregs 91662306a36Sopenharmony_ci tst.b %d0 91762306a36Sopenharmony_ci bne.l error 91862306a36Sopenharmony_ci 91962306a36Sopenharmony_ci bsr.l chkfpregs 92062306a36Sopenharmony_ci tst.b %d0 92162306a36Sopenharmony_ci bne.l error 92262306a36Sopenharmony_ci 92362306a36Sopenharmony_ci clr.l %d0 92462306a36Sopenharmony_ci rts 92562306a36Sopenharmony_ci 92662306a36Sopenharmony_ci##################################################################### 92762306a36Sopenharmony_ci 92862306a36Sopenharmony_ci# This test will take an underflow directly. 92962306a36Sopenharmony_ciunfl_str: 93062306a36Sopenharmony_ci string "\tEnabled underflow..." 93162306a36Sopenharmony_ci 93262306a36Sopenharmony_ci align 0x4 93362306a36Sopenharmony_ciunfl_0: 93462306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 93562306a36Sopenharmony_ci 93662306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 93762306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 93862306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 93962306a36Sopenharmony_ci 94062306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 94162306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 94262306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 94362306a36Sopenharmony_ci fmov.l &0x00000800,%fpcr 94462306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 94562306a36Sopenharmony_ci 94662306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x0(%a6) 94762306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 94862306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 94962306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 95062306a36Sopenharmony_ci 95162306a36Sopenharmony_ci mov.w &0x0000,%cc 95262306a36Sopenharmony_ciunfl_0_pc: 95362306a36Sopenharmony_ci fdiv.b &0x2,%fp0 95462306a36Sopenharmony_ci 95562306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 95662306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 95762306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 95862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 95962306a36Sopenharmony_ci 96062306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x0(%a6) 96162306a36Sopenharmony_ci mov.l &0x40000000,IFPREGS+0x4(%a6) 96262306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 96362306a36Sopenharmony_ci mov.l &0x00000800,IFPCREGS+0x4(%a6) 96462306a36Sopenharmony_ci lea unfl_0_pc(%pc),%a0 96562306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 96662306a36Sopenharmony_ci 96762306a36Sopenharmony_ci bsr.l chkregs 96862306a36Sopenharmony_ci tst.b %d0 96962306a36Sopenharmony_ci bne.l error 97062306a36Sopenharmony_ci 97162306a36Sopenharmony_ci bsr.l chkfpregs 97262306a36Sopenharmony_ci tst.b %d0 97362306a36Sopenharmony_ci bne.l error 97462306a36Sopenharmony_ci 97562306a36Sopenharmony_ci clr.l %d0 97662306a36Sopenharmony_ci rts 97762306a36Sopenharmony_ci 97862306a36Sopenharmony_ci##################################################################### 97962306a36Sopenharmony_ci 98062306a36Sopenharmony_ci# This test will take a non-maskable underflow directly. 98162306a36Sopenharmony_ciunfl_nm_str: 98262306a36Sopenharmony_ci string "\tNon-maskable underflow..." 98362306a36Sopenharmony_ci 98462306a36Sopenharmony_ci align 0x4 98562306a36Sopenharmony_ciunfl_nm_0: 98662306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 98762306a36Sopenharmony_ci 98862306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 98962306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 99062306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 99162306a36Sopenharmony_ci 99262306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 99362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 99462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 99562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 99662306a36Sopenharmony_ci 99762306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x0(%a6) 99862306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 99962306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 100062306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 100162306a36Sopenharmony_ci 100262306a36Sopenharmony_ci mov.w &0x0000,%cc 100362306a36Sopenharmony_ciunfl_nm_0_pc: 100462306a36Sopenharmony_ci fdiv.b &0x2,%fp0 100562306a36Sopenharmony_ci 100662306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 100762306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 100862306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 100962306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 101062306a36Sopenharmony_ci 101162306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x0(%a6) 101262306a36Sopenharmony_ci mov.l &0x40000000,IFPREGS+0x4(%a6) 101362306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 101462306a36Sopenharmony_ci mov.l &0x00000800,IFPCREGS+0x4(%a6) 101562306a36Sopenharmony_ci lea unfl_nm_0_pc(%pc),%a0 101662306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 101762306a36Sopenharmony_ci 101862306a36Sopenharmony_ci bsr.l chkregs 101962306a36Sopenharmony_ci tst.b %d0 102062306a36Sopenharmony_ci bne.l error 102162306a36Sopenharmony_ci 102262306a36Sopenharmony_ci bsr.l chkfpregs 102362306a36Sopenharmony_ci tst.b %d0 102462306a36Sopenharmony_ci bne.l error 102562306a36Sopenharmony_ci 102662306a36Sopenharmony_ci clr.l %d0 102762306a36Sopenharmony_ci rts 102862306a36Sopenharmony_ci 102962306a36Sopenharmony_ci##################################################################### 103062306a36Sopenharmony_ci 103162306a36Sopenharmony_ciinex_str: 103262306a36Sopenharmony_ci string "\tEnabled inexact..." 103362306a36Sopenharmony_ci 103462306a36Sopenharmony_ci align 0x4 103562306a36Sopenharmony_ciinex_0: 103662306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 103762306a36Sopenharmony_ci 103862306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 103962306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 104062306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 104162306a36Sopenharmony_ci 104262306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 104362306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 104462306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 104562306a36Sopenharmony_ci fmov.l &0x00000200,%fpcr # enable inexact 104662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 104762306a36Sopenharmony_ci 104862306a36Sopenharmony_ci mov.l &0x50000000,DATA+0x0(%a6) 104962306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 105062306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 105162306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 105262306a36Sopenharmony_ci 105362306a36Sopenharmony_ci mov.w &0x0000,%cc 105462306a36Sopenharmony_ciinex_0_pc: 105562306a36Sopenharmony_ci fadd.b &0x2,%fp0 105662306a36Sopenharmony_ci 105762306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 105862306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 105962306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 106062306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 106162306a36Sopenharmony_ci 106262306a36Sopenharmony_ci mov.l &0x50000000,IFPREGS+0x0(%a6) 106362306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 106462306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 106562306a36Sopenharmony_ci mov.l &0x00000208,IFPCREGS+0x4(%a6) 106662306a36Sopenharmony_ci lea inex_0_pc(%pc),%a0 106762306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 106862306a36Sopenharmony_ci 106962306a36Sopenharmony_ci bsr.l chkregs 107062306a36Sopenharmony_ci tst.b %d0 107162306a36Sopenharmony_ci bne.l error 107262306a36Sopenharmony_ci 107362306a36Sopenharmony_ci bsr.l chkfpregs 107462306a36Sopenharmony_ci tst.b %d0 107562306a36Sopenharmony_ci bne.l error 107662306a36Sopenharmony_ci 107762306a36Sopenharmony_ci clr.l %d0 107862306a36Sopenharmony_ci rts 107962306a36Sopenharmony_ci 108062306a36Sopenharmony_ci##################################################################### 108162306a36Sopenharmony_ci 108262306a36Sopenharmony_cisnan_str: 108362306a36Sopenharmony_ci string "\tEnabled SNAN..." 108462306a36Sopenharmony_ci 108562306a36Sopenharmony_ci align 0x4 108662306a36Sopenharmony_cisnan_0: 108762306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 108862306a36Sopenharmony_ci 108962306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 109062306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 109162306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 109262306a36Sopenharmony_ci 109362306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 109462306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 109562306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 109662306a36Sopenharmony_ci fmov.l &0x00004000,%fpcr # enable SNAN 109762306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 109862306a36Sopenharmony_ci 109962306a36Sopenharmony_ci mov.l &0xffff0000,DATA+0x0(%a6) 110062306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x4(%a6) 110162306a36Sopenharmony_ci mov.l &0x00000001,DATA+0x8(%a6) 110262306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 110362306a36Sopenharmony_ci 110462306a36Sopenharmony_ci mov.w &0x0000,%cc 110562306a36Sopenharmony_cisnan_0_pc: 110662306a36Sopenharmony_ci fadd.b &0x2,%fp0 110762306a36Sopenharmony_ci 110862306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 110962306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 111062306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 111162306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 111262306a36Sopenharmony_ci 111362306a36Sopenharmony_ci mov.l &0xffff0000,IFPREGS+0x0(%a6) 111462306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x4(%a6) 111562306a36Sopenharmony_ci mov.l &0x00000001,IFPREGS+0x8(%a6) 111662306a36Sopenharmony_ci mov.l &0x09004080,IFPCREGS+0x4(%a6) 111762306a36Sopenharmony_ci lea snan_0_pc(%pc),%a0 111862306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 111962306a36Sopenharmony_ci 112062306a36Sopenharmony_ci bsr.l chkregs 112162306a36Sopenharmony_ci tst.b %d0 112262306a36Sopenharmony_ci bne.l error 112362306a36Sopenharmony_ci 112462306a36Sopenharmony_ci bsr.l chkfpregs 112562306a36Sopenharmony_ci tst.b %d0 112662306a36Sopenharmony_ci bne.l error 112762306a36Sopenharmony_ci 112862306a36Sopenharmony_ci clr.l %d0 112962306a36Sopenharmony_ci rts 113062306a36Sopenharmony_ci 113162306a36Sopenharmony_ci##################################################################### 113262306a36Sopenharmony_ci 113362306a36Sopenharmony_cioperr_str: 113462306a36Sopenharmony_ci string "\tEnabled OPERR..." 113562306a36Sopenharmony_ci 113662306a36Sopenharmony_ci align 0x4 113762306a36Sopenharmony_cioperr_0: 113862306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 113962306a36Sopenharmony_ci 114062306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 114162306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 114262306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 114362306a36Sopenharmony_ci 114462306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 114562306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 114662306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 114762306a36Sopenharmony_ci fmov.l &0x00002000,%fpcr # enable OPERR 114862306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 114962306a36Sopenharmony_ci 115062306a36Sopenharmony_ci mov.l &0xffff0000,DATA+0x0(%a6) 115162306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x4(%a6) 115262306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 115362306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 115462306a36Sopenharmony_ci 115562306a36Sopenharmony_ci mov.w &0x0000,%cc 115662306a36Sopenharmony_cioperr_0_pc: 115762306a36Sopenharmony_ci fadd.s &0x7f800000,%fp0 115862306a36Sopenharmony_ci 115962306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 116062306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 116162306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 116262306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 116362306a36Sopenharmony_ci 116462306a36Sopenharmony_ci mov.l &0xffff0000,IFPREGS+0x0(%a6) 116562306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x4(%a6) 116662306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 116762306a36Sopenharmony_ci mov.l &0x01002080,IFPCREGS+0x4(%a6) 116862306a36Sopenharmony_ci lea operr_0_pc(%pc),%a0 116962306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 117062306a36Sopenharmony_ci 117162306a36Sopenharmony_ci bsr.l chkregs 117262306a36Sopenharmony_ci tst.b %d0 117362306a36Sopenharmony_ci bne.l error 117462306a36Sopenharmony_ci 117562306a36Sopenharmony_ci bsr.l chkfpregs 117662306a36Sopenharmony_ci tst.b %d0 117762306a36Sopenharmony_ci bne.l error 117862306a36Sopenharmony_ci 117962306a36Sopenharmony_ci clr.l %d0 118062306a36Sopenharmony_ci rts 118162306a36Sopenharmony_ci 118262306a36Sopenharmony_ci##################################################################### 118362306a36Sopenharmony_ci 118462306a36Sopenharmony_cidz_str: 118562306a36Sopenharmony_ci string "\tEnabled DZ..." 118662306a36Sopenharmony_ci 118762306a36Sopenharmony_ci align 0x4 118862306a36Sopenharmony_cidz_0: 118962306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 119062306a36Sopenharmony_ci 119162306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 119262306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 119362306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 119462306a36Sopenharmony_ci 119562306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 119662306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 119762306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 119862306a36Sopenharmony_ci fmov.l &0x00000400,%fpcr # enable DZ 119962306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 120062306a36Sopenharmony_ci 120162306a36Sopenharmony_ci mov.l &0x40000000,DATA+0x0(%a6) 120262306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x4(%a6) 120362306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 120462306a36Sopenharmony_ci fmovm.x DATA(%a6),&0x80 120562306a36Sopenharmony_ci 120662306a36Sopenharmony_ci mov.w &0x0000,%cc 120762306a36Sopenharmony_cidz_0_pc: 120862306a36Sopenharmony_ci fdiv.b &0x0,%fp0 120962306a36Sopenharmony_ci 121062306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 121162306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 121262306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 121362306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 121462306a36Sopenharmony_ci 121562306a36Sopenharmony_ci mov.l &0x40000000,IFPREGS+0x0(%a6) 121662306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 121762306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 121862306a36Sopenharmony_ci mov.l &0x02000410,IFPCREGS+0x4(%a6) 121962306a36Sopenharmony_ci lea dz_0_pc(%pc),%a0 122062306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 122162306a36Sopenharmony_ci 122262306a36Sopenharmony_ci bsr.l chkregs 122362306a36Sopenharmony_ci tst.b %d0 122462306a36Sopenharmony_ci bne.l error 122562306a36Sopenharmony_ci 122662306a36Sopenharmony_ci bsr.l chkfpregs 122762306a36Sopenharmony_ci tst.b %d0 122862306a36Sopenharmony_ci bne.l error 122962306a36Sopenharmony_ci 123062306a36Sopenharmony_ci clr.l %d0 123162306a36Sopenharmony_ci rts 123262306a36Sopenharmony_ci 123362306a36Sopenharmony_ci##################################################################### 123462306a36Sopenharmony_ci 123562306a36Sopenharmony_ciunsupp_str: 123662306a36Sopenharmony_ci string "\tUnimplemented data type/format..." 123762306a36Sopenharmony_ci 123862306a36Sopenharmony_ci# an unnormalized number 123962306a36Sopenharmony_ci align 0x4 124062306a36Sopenharmony_ciunsupp_0: 124162306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 124262306a36Sopenharmony_ci 124362306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 124462306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 124562306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 124662306a36Sopenharmony_ci 124762306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 124862306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 124962306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 125062306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 125162306a36Sopenharmony_ci 125262306a36Sopenharmony_ci mov.l &0xc03f0000,DATA+0x0(%a6) 125362306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x4(%a6) 125462306a36Sopenharmony_ci mov.l &0x00000001,DATA+0x8(%a6) 125562306a36Sopenharmony_ci fmov.b &0x2,%fp0 125662306a36Sopenharmony_ci mov.w &0x0000,%cc 125762306a36Sopenharmony_ciunsupp_0_pc: 125862306a36Sopenharmony_ci fmul.x DATA(%a6),%fp0 125962306a36Sopenharmony_ci 126062306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 126162306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 126262306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 126362306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 126462306a36Sopenharmony_ci 126562306a36Sopenharmony_ci mov.l &0xc0010000,IFPREGS+0x0(%a6) 126662306a36Sopenharmony_ci mov.l &0x80000000,IFPREGS+0x4(%a6) 126762306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 126862306a36Sopenharmony_ci mov.l &0x08000000,IFPCREGS+0x4(%a6) 126962306a36Sopenharmony_ci lea unsupp_0_pc(%pc),%a0 127062306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 127162306a36Sopenharmony_ci 127262306a36Sopenharmony_ci bsr.l chkregs 127362306a36Sopenharmony_ci tst.b %d0 127462306a36Sopenharmony_ci bne.l error 127562306a36Sopenharmony_ci 127662306a36Sopenharmony_ci bsr.l chkfpregs 127762306a36Sopenharmony_ci tst.b %d0 127862306a36Sopenharmony_ci bne.l error 127962306a36Sopenharmony_ci 128062306a36Sopenharmony_ci# a denormalized number 128162306a36Sopenharmony_ciunsupp_1: 128262306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 128362306a36Sopenharmony_ci 128462306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 128562306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 128662306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 128762306a36Sopenharmony_ci 128862306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 128962306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 129062306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 129162306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 129262306a36Sopenharmony_ci 129362306a36Sopenharmony_ci mov.l &0x80000000,DATA+0x0(%a6) 129462306a36Sopenharmony_ci mov.l &0x01000000,DATA+0x4(%a6) 129562306a36Sopenharmony_ci mov.l &0x00000000,DATA+0x8(%a6) 129662306a36Sopenharmony_ci fmov.l &0x7fffffff,%fp0 129762306a36Sopenharmony_ci 129862306a36Sopenharmony_ci mov.w &0x0000,%cc 129962306a36Sopenharmony_ciunsupp_1_pc: 130062306a36Sopenharmony_ci fmul.x DATA(%a6),%fp0 130162306a36Sopenharmony_ci 130262306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 130362306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 130462306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 130562306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 130662306a36Sopenharmony_ci 130762306a36Sopenharmony_ci mov.l &0x80170000,IFPREGS+0x0(%a6) 130862306a36Sopenharmony_ci mov.l &0xfffffffe,IFPREGS+0x4(%a6) 130962306a36Sopenharmony_ci mov.l &0x00000000,IFPREGS+0x8(%a6) 131062306a36Sopenharmony_ci mov.l &0x08000000,IFPCREGS+0x4(%a6) 131162306a36Sopenharmony_ci lea unsupp_1_pc(%pc),%a0 131262306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 131362306a36Sopenharmony_ci 131462306a36Sopenharmony_ci bsr.l chkregs 131562306a36Sopenharmony_ci tst.b %d0 131662306a36Sopenharmony_ci bne.l error 131762306a36Sopenharmony_ci 131862306a36Sopenharmony_ci bsr.l chkfpregs 131962306a36Sopenharmony_ci tst.b %d0 132062306a36Sopenharmony_ci bne.l error 132162306a36Sopenharmony_ci 132262306a36Sopenharmony_ci# packed 132362306a36Sopenharmony_ciunsupp_2: 132462306a36Sopenharmony_ci addq.l &0x1,TESTCTR(%a6) 132562306a36Sopenharmony_ci 132662306a36Sopenharmony_ci movm.l DEF_REGS(%pc),&0x3fff 132762306a36Sopenharmony_ci fmovm.x DEF_FPREGS(%pc),&0xff 132862306a36Sopenharmony_ci fmovm.l DEF_FPCREGS(%pc),%fpcr,%fpsr,%fpiar 132962306a36Sopenharmony_ci 133062306a36Sopenharmony_ci mov.w &0x0000,ICCR(%a6) 133162306a36Sopenharmony_ci movm.l &0x7fff,IREGS(%a6) 133262306a36Sopenharmony_ci fmovm.x &0xff,IFPREGS(%a6) 133362306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,IFPCREGS(%a6) 133462306a36Sopenharmony_ci 133562306a36Sopenharmony_ci mov.l &0xc1230001,DATA+0x0(%a6) 133662306a36Sopenharmony_ci mov.l &0x23456789,DATA+0x4(%a6) 133762306a36Sopenharmony_ci mov.l &0x12345678,DATA+0x8(%a6) 133862306a36Sopenharmony_ci 133962306a36Sopenharmony_ci mov.w &0x0000,%cc 134062306a36Sopenharmony_ciunsupp_2_pc: 134162306a36Sopenharmony_ci fabs.p DATA(%a6),%fp0 134262306a36Sopenharmony_ci 134362306a36Sopenharmony_ci mov.w %cc,SCCR(%a6) 134462306a36Sopenharmony_ci movm.l &0x7fff,SREGS(%a6) 134562306a36Sopenharmony_ci fmovm.x &0xff,SFPREGS(%a6) 134662306a36Sopenharmony_ci fmovm.l %fpcr,%fpsr,%fpiar,SFPCREGS(%a6) 134762306a36Sopenharmony_ci 134862306a36Sopenharmony_ci mov.l &0x3e660000,IFPREGS+0x0(%a6) 134962306a36Sopenharmony_ci mov.l &0xd0ed23e8,IFPREGS+0x4(%a6) 135062306a36Sopenharmony_ci mov.l &0xd14035bc,IFPREGS+0x8(%a6) 135162306a36Sopenharmony_ci mov.l &0x00000108,IFPCREGS+0x4(%a6) 135262306a36Sopenharmony_ci lea unsupp_2_pc(%pc),%a0 135362306a36Sopenharmony_ci mov.l %a0,IFPCREGS+0x8(%a6) 135462306a36Sopenharmony_ci 135562306a36Sopenharmony_ci bsr.l chkregs 135662306a36Sopenharmony_ci tst.b %d0 135762306a36Sopenharmony_ci bne.l error 135862306a36Sopenharmony_ci 135962306a36Sopenharmony_ci bsr.l chkfpregs 136062306a36Sopenharmony_ci tst.b %d0 136162306a36Sopenharmony_ci bne.l error 136262306a36Sopenharmony_ci 136362306a36Sopenharmony_ci clr.l %d0 136462306a36Sopenharmony_ci rts 136562306a36Sopenharmony_ci 136662306a36Sopenharmony_ci########################################################### 136762306a36Sopenharmony_ci########################################################### 136862306a36Sopenharmony_ci 136962306a36Sopenharmony_cichkregs: 137062306a36Sopenharmony_ci lea IREGS(%a6),%a0 137162306a36Sopenharmony_ci lea SREGS(%a6),%a1 137262306a36Sopenharmony_ci mov.l &14,%d0 137362306a36Sopenharmony_cichkregs_loop: 137462306a36Sopenharmony_ci cmp.l (%a0)+,(%a1)+ 137562306a36Sopenharmony_ci bne.l chkregs_error 137662306a36Sopenharmony_ci dbra.w %d0,chkregs_loop 137762306a36Sopenharmony_ci 137862306a36Sopenharmony_ci mov.w ICCR(%a6),%d0 137962306a36Sopenharmony_ci mov.w SCCR(%a6),%d1 138062306a36Sopenharmony_ci cmp.w %d0,%d1 138162306a36Sopenharmony_ci bne.l chkregs_error 138262306a36Sopenharmony_ci 138362306a36Sopenharmony_ci clr.l %d0 138462306a36Sopenharmony_ci rts 138562306a36Sopenharmony_ci 138662306a36Sopenharmony_cichkregs_error: 138762306a36Sopenharmony_ci movq.l &0x1,%d0 138862306a36Sopenharmony_ci rts 138962306a36Sopenharmony_ci 139062306a36Sopenharmony_cierror: 139162306a36Sopenharmony_ci mov.l TESTCTR(%a6),%d1 139262306a36Sopenharmony_ci movq.l &0x1,%d0 139362306a36Sopenharmony_ci rts 139462306a36Sopenharmony_ci 139562306a36Sopenharmony_cichkfpregs: 139662306a36Sopenharmony_ci lea IFPREGS(%a6),%a0 139762306a36Sopenharmony_ci lea SFPREGS(%a6),%a1 139862306a36Sopenharmony_ci mov.l &23,%d0 139962306a36Sopenharmony_cichkfpregs_loop: 140062306a36Sopenharmony_ci cmp.l (%a0)+,(%a1)+ 140162306a36Sopenharmony_ci bne.l chkfpregs_error 140262306a36Sopenharmony_ci dbra.w %d0,chkfpregs_loop 140362306a36Sopenharmony_ci 140462306a36Sopenharmony_ci lea IFPCREGS(%a6),%a0 140562306a36Sopenharmony_ci lea SFPCREGS(%a6),%a1 140662306a36Sopenharmony_ci cmp.l (%a0)+,(%a1)+ 140762306a36Sopenharmony_ci bne.l chkfpregs_error 140862306a36Sopenharmony_ci cmp.l (%a0)+,(%a1)+ 140962306a36Sopenharmony_ci bne.l chkfpregs_error 141062306a36Sopenharmony_ci cmp.l (%a0)+,(%a1)+ 141162306a36Sopenharmony_ci bne.l chkfpregs_error 141262306a36Sopenharmony_ci 141362306a36Sopenharmony_ci clr.l %d0 141462306a36Sopenharmony_ci rts 141562306a36Sopenharmony_ci 141662306a36Sopenharmony_cichkfpregs_error: 141762306a36Sopenharmony_ci movq.l &0x1,%d0 141862306a36Sopenharmony_ci rts 141962306a36Sopenharmony_ci 142062306a36Sopenharmony_ciDEF_REGS: 142162306a36Sopenharmony_ci long 0xacacacac, 0xacacacac, 0xacacacac, 0xacacacac 142262306a36Sopenharmony_ci long 0xacacacac, 0xacacacac, 0xacacacac, 0xacacacac 142362306a36Sopenharmony_ci 142462306a36Sopenharmony_ci long 0xacacacac, 0xacacacac, 0xacacacac, 0xacacacac 142562306a36Sopenharmony_ci long 0xacacacac, 0xacacacac, 0xacacacac, 0xacacacac 142662306a36Sopenharmony_ci 142762306a36Sopenharmony_ciDEF_FPREGS: 142862306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 142962306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143062306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143162306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143262306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143362306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143462306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143562306a36Sopenharmony_ci long 0x7fff0000, 0xffffffff, 0xffffffff 143662306a36Sopenharmony_ci 143762306a36Sopenharmony_ciDEF_FPCREGS: 143862306a36Sopenharmony_ci long 0x00000000, 0x00000000, 0x00000000 143962306a36Sopenharmony_ci 144062306a36Sopenharmony_ci############################################################ 144162306a36Sopenharmony_ci 144262306a36Sopenharmony_ci_print_str: 144362306a36Sopenharmony_ci mov.l %d0,-(%sp) 144462306a36Sopenharmony_ci mov.l (TESTTOP-0x80+0x0,%pc),%d0 144562306a36Sopenharmony_ci pea (TESTTOP-0x80,%pc,%d0) 144662306a36Sopenharmony_ci mov.l 0x4(%sp),%d0 144762306a36Sopenharmony_ci rtd &0x4 144862306a36Sopenharmony_ci 144962306a36Sopenharmony_ci_print_num: 145062306a36Sopenharmony_ci mov.l %d0,-(%sp) 145162306a36Sopenharmony_ci mov.l (TESTTOP-0x80+0x4,%pc),%d0 145262306a36Sopenharmony_ci pea (TESTTOP-0x80,%pc,%d0) 145362306a36Sopenharmony_ci mov.l 0x4(%sp),%d0 145462306a36Sopenharmony_ci rtd &0x4 145562306a36Sopenharmony_ci 145662306a36Sopenharmony_ci############################################################ 1457