RTOS/rtems
1
0
Fork 0
forked from Imagelibrary/rtems
Code Pull Requests Activity

This code was in the tree but not actually being compiled. There

Browse Source 
were a number of minor problems which had to be fixed to get it
to compile including modifying the compile rule to handle C++ comments,
changing the syntax of the include statement, and getting rid of "%"
as part of register names.
This commit is contained in:
Joel Sherrill
1997-07-09 23:41:20 +00:00
parent 8fabc27347
commit 1d320bac21
34 changed files with 140 additions and 140 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
c/src/lib/libcpu/m68k/m68040/fpsp/bindec.s
View File

@@ -137,7 +137,7 @@
//BINDEC idnt 2,1 | Motorola 040 Floating Point Software Package
.include "fpsp.defs"
#include "fpsp.defs"
|section 8

2
c/src/lib/libcpu/m68k/m68040/fpsp/binstr.s
View File

@@ -68,7 +68,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
.global binstr
binstr:

2
c/src/lib/libcpu/m68k/m68040/fpsp/bugfix.s
View File

@@ -160,7 +160,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref fpsp_fmt_error

2
c/src/lib/libcpu/m68k/m68040/fpsp/decbin.s
View File

@@ -77,7 +77,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
//
// PTENRN, PTENRM, and PTENRP are arrays of powers of 10 rounded

2
c/src/lib/libcpu/m68k/m68040/fpsp/do_func.s
View File

@@ -30,7 +30,7 @@ DO_FUNC: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref t_dz2
|xref t_operr

2
c/src/lib/libcpu/m68k/m68040/fpsp/gen_except.s
View File

@@ -37,7 +37,7 @@ GEN_EXCEPT: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref real_trace
|xref fpsp_done

2
c/src/lib/libcpu/m68k/m68040/fpsp/get_op.s
View File

@@ -62,7 +62,7 @@ GET_OP: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
.global PIRN,PIRZRM,PIRP
.global SMALRN,SMALRZRM,SMALRP

2
c/src/lib/libcpu/m68k/m68040/fpsp/kernel_ex.s
View File

@@ -20,7 +20,7 @@ KERNEL_EX: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
mns_inf: .long 0xffff0000,0x00000000,0x00000000
pls_inf: .long 0x7fff0000,0x00000000,0x00000000

2
c/src/lib/libcpu/m68k/m68040/fpsp/res_func.s
View File

@@ -24,7 +24,7 @@ RES_FUNC: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
sp_bnds: .short 0x3f81,0x407e
.short 0x3f6a,0x0000

2
c/src/lib/libcpu/m68k/m68040/fpsp/round.s
View File

@@ -16,7 +16,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
//
// round --- round result according to precision/mode

214
c/src/lib/libcpu/m68k/m68040/fpsp/rtems_skel.s
View File

@@ -45,7 +45,7 @@
//SKELETON idnt 2,1 | Motorola 040 Floating Point Software Package
.include "fpsp.defs"
#include "fpsp.defs"
//
// Divide by Zero exception
@@ -54,11 +54,11 @@
//
.global SYM(_fpspEntry_dz)
SYM(_fpspEntry_dz):
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E1,E_BYTE(%a6)
frestore (%sp)+
unlk %a6
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E1,E_BYTE(a6)
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+3*4],za0)
//
@@ -85,32 +85,32 @@ SYM(_fpspEntry_dz):
.global SYM(_fpspEntry_inex)
.global real_inex
SYM(_fpspEntry_inex):
link %a6,#-LOCAL_SIZE
fsave -(%sp)
cmpib #VER_40,(%sp) //test version number
link a6,#-LOCAL_SIZE
fsave -(sp)
cmpib #VER_40,(sp) //test version number
bnes not_fmt40
fmovel %fpsr,-(%sp)
btstb #E1,E_BYTE(%a6) //test for E1 set
fmovel fpsr,-(sp)
btstb #E1,E_BYTE(a6) //test for E1 set
beqs not_b1232
btstb #snan_bit,2(%sp) //test for snan
btstb #snan_bit,2(sp) //test for snan
beq inex_ckofl
addl #4,%sp
frestore (%sp)+
unlk %a6
addl #4,sp
frestore (sp)+
unlk a6
bra snan
inex_ckofl:
btstb #ovfl_bit,2(%sp) //test for ovfl
btstb #ovfl_bit,2(sp) //test for ovfl
beq inex_ckufl
addl #4,%sp
frestore (%sp)+
unlk %a6
addl #4,sp
frestore (sp)+
unlk a6
bra SYM(_fpspEntry_ovfl)
inex_ckufl:
btstb #unfl_bit,2(%sp) //test for unfl
btstb #unfl_bit,2(sp) //test for unfl
beq not_b1232
addl #4,%sp
frestore (%sp)+
unlk %a6
addl #4,sp
frestore (sp)+
unlk a6
bra SYM(_fpspEntry_unfl)
//
@@ -118,31 +118,31 @@ inex_ckufl:
// real_inex.
//
not_b1232:
addl #4,%sp
frestore (%sp)+
unlk %a6
addl #4,sp
frestore (sp)+
unlk a6
real_inex:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
link a6,#-LOCAL_SIZE
fsave -(sp)
not_fmt40:
bclrb #E3,E_BYTE(%a6) //clear and test E3 flag
bclrb #E3,E_BYTE(a6) //clear and test E3 flag
beqs inex_cke1
//
// Clear dirty bit on dest resister in the frame before branching
// to b1238_fix.
//
moveml %d0/%d1,USER_DA(%a6)
bfextu CMDREG1B(%a6){#6:#3},%d0 //get dest reg no
bclrb %d0,FPR_DIRTY_BITS(%a6) //clr dest dirty bit
moveml d0/d1,USER_DA(a6)
bfextu CMDREG1B(a6){#6:#3},d0 //get dest reg no
bclrb d0,FPR_DIRTY_BITS(a6) //clr dest dirty bit
bsrl b1238_fix //test for bug1238 case
moveml USER_DA(%a6),%d0/%d1
moveml USER_DA(a6),d0/d1
bras inex_done
inex_cke1:
bclrb #E1,E_BYTE(%a6)
bclrb #E1,E_BYTE(a6)
inex_done:
frestore (%sp)+
unlk %a6
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+2*4],za0)
//
@@ -153,14 +153,14 @@ inex_done:
SYM(_fpspEntry_ovfl):
jmp fpsp_ovfl
real_ovfl:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E3,E_BYTE(%a6) //clear and test E3 flag
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E3,E_BYTE(a6) //clear and test E3 flag
bnes ovfl_done
bclrb #E1,E_BYTE(%a6)
bclrb #E1,E_BYTE(a6)
ovfl_done:
frestore (%sp)+
unlk %a6
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+6*4],za0)
//
@@ -171,14 +171,14 @@ ovfl_done:
SYM(_fpspEntry_unfl):
jmp fpsp_unfl
real_unfl:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E3,E_BYTE(%a6) //clear and test E3 flag
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E3,E_BYTE(a6) //clear and test E3 flag
bnes unfl_done
bclrb #E1,E_BYTE(%a6)
bclrb #E1,E_BYTE(a6)
unfl_done:
frestore (%sp)+
unlk %a6
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+4*4],za0)
//
@@ -190,11 +190,11 @@ SYM(_fpspEntry_snan):
snan:
jmp fpsp_snan
real_snan:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E1,E_BYTE(%a6) //snan is always an E1 exception
frestore (%sp)+
unlk %a6
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E1,E_BYTE(a6) //snan is always an E1 exception
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+7*4],za0)
//
@@ -205,11 +205,11 @@ real_snan:
SYM(_fpspEntry_operr):
jmp fpsp_operr
real_operr:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E1,E_BYTE(%a6) //operr is always an E1 exception
frestore (%sp)+
unlk %a6
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E1,E_BYTE(a6) //operr is always an E1 exception
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+5*4],za0)
//
@@ -222,14 +222,14 @@ real_operr:
SYM(_fpspEntry_bsun):
jmp fpsp_bsun
real_bsun:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E1,E_BYTE(%a6) //bsun is always an E1 exception
fmovel %FPSR,-(%sp)
bclrb #nan_bit,(%sp)
fmovel (%sp)+,%FPSR
frestore (%sp)+
unlk %a6
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E1,E_BYTE(a6) //bsun is always an E1 exception
fmovel fpsr,-(sp)
bclrb #nan_bit,(sp)
fmovel (sp)+,fpsr
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+1*4],za0)
//
@@ -253,11 +253,11 @@ real_fline:
SYM(_fpspEntry_unsupp):
jmp fpsp_unsupp
real_unsupp:
link %a6,#-LOCAL_SIZE
fsave -(%sp)
bclrb #E1,E_BYTE(%a6) //unsupp is always an E1 exception
frestore (%sp)+
unlk %a6
link a6,#-LOCAL_SIZE
fsave -(sp)
bclrb #E1,E_BYTE(a6) //unsupp is always an E1 exception
frestore (sp)+
unlk a6
jmp ([SYM(M68040FPSPUserExceptionHandlers)+8*4],za0)
//
@@ -309,21 +309,21 @@ fpsp_done:
//
.global mem_write
mem_write:
btstb #5,EXC_SR(%a6) //check for supervisor state
btstb #5,EXC_SR(a6) //check for supervisor state
beqs user_write
super_write:
moveb (%a0)+,(%a1)+
subql #1,%d0
moveb (a0)+,(a1)+
subql #1,d0
bnes super_write
rts
user_write:
movel %d1,-(%sp) //preserve d1 just in case
movel %d0,-(%sp)
movel %a1,-(%sp)
movel %a0,-(%sp)
movel d1,-(sp) //preserve d1 just in case
movel d0,-(sp)
movel a1,-(sp)
movel a0,-(sp)
jsr copyout
addw #12,%sp
movel (%sp)+,%d1
addw #12,sp
movel (sp)+,d1
rts
//
// mem_read --- read from user or supervisor address space
@@ -346,21 +346,21 @@ user_write:
//
.global mem_read
mem_read:
btstb #5,EXC_SR(%a6) //check for supervisor state
btstb #5,EXC_SR(a6) //check for supervisor state
beqs user_read
super_read:
moveb (%a0)+,(%a1)+
subql #1,%d0
moveb (a0)+,(a1)+
subql #1,d0
bnes super_read
rts
user_read:
movel %d1,-(%sp) //preserve d1 just in case
movel %d0,-(%sp)
movel %a1,-(%sp)
movel %a0,-(%sp)
movel d1,-(sp) //preserve d1 just in case
movel d0,-(sp)
movel a1,-(sp)
movel a0,-(sp)
jsr copyin
addw #12,%sp
movel (%sp)+,%d1
addw #12,sp
movel (sp)+,d1
rts
//
@@ -369,29 +369,29 @@ user_read:
// and copyin overwrites SFC.
//
copyout:
movel 4(%sp),%a0 // source
movel 8(%sp),%a1 // destination
movel 12(%sp),%d0 // count
subl #1,%d0 // dec count by 1 for dbra
movel #1,%d1
movec %d1,%DFC // set dfc for user data space
movel 4(sp),a0 // source
movel 8(sp),a1 // destination
movel 12(sp),d0 // count
subl #1,d0 // dec count by 1 for dbra
movel #1,d1
movec d1,dfc // set dfc for user data space
moreout:
moveb (%a0)+,%d1 // fetch supervisor byte
movesb %d1,(%a1)+ // write user byte
dbf %d0,moreout
moveb (a0)+,d1 // fetch supervisor byte
movesb d1,(a1)+ // write user byte
dbf d0,moreout
rts
copyin:
movel 4(%sp),%a0 // source
movel 8(%sp),%a1 // destination
movel 12(%sp),%d0 // count
subl #1,%d0 // dec count by 1 for dbra
movel #1,%d1
movec %d1,%SFC // set sfc for user space
movel 4(sp),a0 // source
movel 8(sp),a1 // destination
movel 12(sp),d0 // count
subl #1,d0 // dec count by 1 for dbra
movel #1,d1
movec d1,sfc // set sfc for user space
morein:
movesb (%a0)+,%d1 // fetch user byte
moveb %d1,(%a1)+ // write supervisor byte
dbf %d0,morein
movesb (a0)+,d1 // fetch user byte
moveb d1,(a1)+ // write supervisor byte
dbf d0,morein
rts
|end

2
c/src/lib/libcpu/m68k/m68040/fpsp/satan.s
View File

@@ -51,7 +51,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
BOUNDS1: .long 0x3FFB8000,0x4002FFFF

2
c/src/lib/libcpu/m68k/m68040/fpsp/scale.s
View File

@@ -29,7 +29,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref t_ovfl2
|xref t_unfl

2
c/src/lib/libcpu/m68k/m68040/fpsp/setox.s
View File

@@ -339,7 +339,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
L2: .long 0x3FDC0000,0x82E30865,0x4361C4C6,0x00000000

2
c/src/lib/libcpu/m68k/m68040/fpsp/sgetem.s
View File

@@ -32,7 +32,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref nrm_set

2
c/src/lib/libcpu/m68k/m68040/fpsp/sint.s
View File

@@ -59,7 +59,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref dnrm_lp
|xref nrm_set

2
c/src/lib/libcpu/m68k/m68040/fpsp/slogn.s
View File

@@ -71,7 +71,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
BOUNDS1: .long 0x3FFEF07D,0x3FFF8841
BOUNDS2: .long 0x3FFE8000,0x3FFFC000

2
c/src/lib/libcpu/m68k/m68040/fpsp/smovecr.s
View File

@@ -23,7 +23,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref nrm_set
|xref round

2
c/src/lib/libcpu/m68k/m68040/fpsp/srem_mod.s
View File

@@ -74,7 +74,7 @@ SREM_MOD: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
.set Mod_Flag,L_SCR3
.set SignY,FP_SCR3+4

2
c/src/lib/libcpu/m68k/m68040/fpsp/ssin.s
View File

@@ -91,7 +91,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
BOUNDS1: .long 0x3FD78000,0x4004BC7E
TWOBYPI: .long 0x3FE45F30,0x6DC9C883

2
c/src/lib/libcpu/m68k/m68040/fpsp/stan.s
View File

@@ -58,7 +58,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
BOUNDS1: .long 0x3FD78000,0x4004BC7E
TWOBYPI: .long 0x3FE45F30,0x6DC9C883

2
c/src/lib/libcpu/m68k/m68040/fpsp/stanh.s
View File

@@ -57,7 +57,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
.set X,FP_SCR5
.set XDCARE,X+2

2
c/src/lib/libcpu/m68k/m68040/fpsp/sto_res.s
View File

@@ -28,7 +28,7 @@ STO_RES: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
.global sto_cos
sto_cos:

2
c/src/lib/libcpu/m68k/m68040/fpsp/stwotox.s
View File

@@ -84,7 +84,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
BOUNDS1: .long 0x3FB98000,0x400D80C0 // ... 2^(-70),16480
BOUNDS2: .long 0x3FB98000,0x400B9B07 // ... 2^(-70),16480 LOG2/LOG10

2
c/src/lib/libcpu/m68k/m68040/fpsp/util.s
View File

@@ -24,7 +24,7 @@
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref mem_read

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_bsun.s
View File

@@ -21,7 +21,7 @@ X_BSUN: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref real_bsun

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_fline.s
View File

@@ -21,7 +21,7 @@ X_FLINE: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref real_fline
|xref fpsp_unimp

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_operr.s
View File

@@ -51,7 +51,7 @@ X_OPERR: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref mem_write
|xref real_operr

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_ovfl.s
View File

@@ -43,7 +43,7 @@ X_OVFL: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref ovf_r_x2
|xref ovf_r_x3

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_snan.s
View File

@@ -30,7 +30,7 @@ X_SNAN: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref get_fline
|xref mem_write

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_store.s
View File

@@ -22,7 +22,7 @@ X_STORE: //idnt 2,1 | Motorola 040 Floating Point Software Package
fpreg_mask:
.byte 0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01
.include "fpsp.defs"
#include "fpsp.defs"
|xref mem_write
|xref get_fline

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_unfl.s
View File

@@ -29,7 +29,7 @@ X_UNFL: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref denorm
|xref round

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_unimp.s
View File

@@ -30,7 +30,7 @@ X_UNIMP: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref get_op
|xref do_func

2
c/src/lib/libcpu/m68k/m68040/fpsp/x_unsupp.s
View File

@@ -31,7 +31,7 @@ X_UNSUPP: //idnt 2,1 | Motorola 040 Floating Point Software Package
|section 8
.include "fpsp.defs"
#include "fpsp.defs"
|xref get_op
|xref res_func