📄 rombioscfg.lst
字号:
1 .else
1
1 .global _DGN_iconst
1 .global _DGN_irand
1 .global _DGN_isine
1 .global _DGN_user
1
1 .asg _DGN_iconst, DGN_CONST
1 .asg _DGN_irand, DGN_RAND
1 .asg _DGN_isine, DGN_SINE
1 .asg _DGN_user, DGN_USER
1
1 .endif
1
360
361 ;; ======== DHL_config ========
362 .asg 00H, _gChannelsAvailable
363 00000074 DHL_config _gChannelsAvailable
1
1 .global _DHL_notify
1
1 .asg 0, DHL$count
1
364
365 ;; ======== DPI_config ========
366 00000074 DPI_config
1 .asg 0, DPI$devid
367
368 ;; ======== CLK_Obj PRD_clock ========
369 ;; This clock function calls PRD_tick from within the on-chip timer ISR
370 ;;
371 ;; CLK_Obj PRD_clock (function)
372 .global PRD_clock
373 .asg PRD_F_tick, _function
374 00000074 CLK_Obj 1, PRD_clock, 0, _function
1 00000074 CHK_nargs "CLK_Obj", fxn
TMS320C6x COFF Assembler Version 4.00 Fri Feb 16 15:50:54 2001
Copyright (c) 1996-2000 Texas Instruments Incorporated
rombioscfg.s62 PAGE 13
1 .if ($symcmp("", "error") = 0)
1 .emsg "CLK_OBJ parameter error."
1 .endif
1
1 .var fxnlen
1 .eval $symlen("PRD_F_tick"),fxnlen
1
1 .if (1 = 0)
1 .mexit
1 .endif
1
1 .global PRD_clock
1
1 .if ($symcmp("PRD_F_tick", "0") != 0)
1 .global PRD_F_tick
1 .endif
1
1 PRD_clock .tag CLK_Obj ; declare name as having type CLK_Obj
1
1 ; allocate all CLK objs contiguously in ".clk"
1 00000000 PRD_clock .usect ".clk", STD_TARGWORDMAUS * 1, STD_TARGWORDMAUS
1
1 00000074 .sect ".cinit"
1
1 .align 8
1
1 00000078 00000004 .field STD_TARGWORDMAUS * 1
1
1 0000007c 00000000- .field PRD_clock
1
1 00000080 00000000! .field PRD_F_tick ; fxn
1
375
376 ;; ======== HST_Obj RTA_fromHost ========
377 ;; Used to access LOG and STS data
378 ;;
379 ;; HST_Obj RTA_fromHost (mode, buf, framesize, numframes, stsflg, notify, arg0, arg1, lnk)
380 .global RTA_fromHost
381 .asg "input", _mode
382 .asg "<NULL>", _buf
383 .asg 04H, _framesize
384 .asg 01H, _numframes
385 .asg 00H, _stsflg
386 .asg _FXN_F_nop, _notify
387 .asg 00H, _arg0
388 .asg 00H, _arg1
389 .asg "RTDX", _lnk
390 00000084 HST_Obj 1, RTA_fromHost, 1, _mode, _buf, _framesize, _numframes, _stsflg, _notify, _arg0, _arg
1
1 .if (1 = 0)
1 .mexit
1 .endif
1
1 00000084 CHK_nargs "HST_Obj", lnktype
1 .if ($symcmp("", "error") = 0)
TMS320C6x COFF Assembler Version 4.00 Fri Feb 16 15:50:54 2001
Copyright (c) 1996-2000 Texas Instruments Incorporated
rombioscfg.s62 PAGE 14
1 .emsg "HST_Obj lnktype error"
1 .endif
1
1 00000084 CHK_domain HST_Obj, mode, "output,input", "output"
2
1 .asg "input", mode
1 .if ($symcmp("input", "error") = 0)
1 .emsg "HST_Obj mode error"
1 .endif
1
1 .global RTA_fromHost, RTA_fromHost$buf, RTA_fromHost$rtdx
1
1 .if ($symcmp("<NULL>", "<NULL>") = 0)
1 00000084 GBL_Obj RTA_fromHost$buf, 04H*01H, .hst1
2 00000084 CHK_domain "GBL_Obj", alignFlag, "noalign,align", "noalign"
3 .mexit
3
3
3
2 .if ($symcmp("noalign", "error") = 0)
2 .emsg "GBL_Obj align parameter error."
2 .endif
2 .asg "noalign", alignFlag
2
2 00000084 CHK_nargs "GBL_Obj", size
2 .if ($symcmp("", "error") = 0)
2 .emsg "GBL_Obj size parameter error."
2 .endif
2
2 .if ($symlen(section) = 0)
2 .asg ".bss", section
2 .endif
2
2 .if ($symlen(fillValue) != 0)
2 .sect ".gblinit"
2 .word :size:
2 .word :name:
2 .word :fillValue:
2 .endif
2
2 .if (($symcmp(section, ".data") = 0) | ($symcmp(alignFlag, "align") = 0))
2 .sect ":section:"
2 .if ($symcmp(alignFlag, "align") = 0)
2 .align
2 .endif
2 :name::
2 ;
2 ; Can't use .space directive here because it reserves
2 ; bits for some processors and bytes for others.
2 ;
2 .loop :size:
2 .word 0
2 .endloop
2
2 .elseif ($symcmp(".hst1", ".bss") = 0)
TMS320C6x COFF Assembler Version 4.00 Fri Feb 16 15:50:54 2001
Copyright (c) 1996-2000 Texas Instruments Incorporated
rombioscfg.s62 PAGE 15
2 .bss :name:, :size: * (STD_TARGWORDMAUS / STD_TARGCHARMAUS), (STD_TARGWORDMAUS / STD_TARGC
2 .else
2 00000000 RTA_fromHost$buf: .usect ".hst1", 04H*01H * (STD_TARGWORDMAUS / STD_TARGCHARMAUS), (STD_TARGWORDMA
2 .endif
2
1 .asg RTA_fromHost$buf, buf
1 .endif
1
1 .if (00H == 0)
1 .asg "none",stsType
1 .else
1 .if ($symcmp(":mode:","input") == 0)
1 .asg "reader",stsType
1 .else
1 .asg "writer",stsType
1 .endif
1 .endif
1
1 ; set first word of HST_Obj table to size of individual HST objects
1
1 .asg 0, chanId
1
1 .if 0 = 0
1
1 00000000 RTA_fromHost$objsize .usect ".hst", STD_TARGWORDMAUS * 1, STD_TARGWORDMAUS
1
1 00000084 .sect ".cinit"
1
1 .align 8
1
1 00000088 00000004 .field STD_TARGWORDMAUS * 1
1
1 0000008c 00000000- .field RTA_fromHost$objsize
1
1 .if ($symcmp("RTDX","RTDX") == 0)
1 00000090 00000014 .field 5 * STD_TARGWORDMAUS
1 .else
1 .field 2 * STD_TARGWORDMAUS
1 .endif
1
1 .endif
1
1 00000004 RTA_fromHost .usect ".hst", STD_TARGWORDMAUS * 2, STD_TARGWORDMAUS
1
1 00000094 .sect ".cinit"
1
1 .align 8
1 00000098 00000008 .field STD_TARGWORDMAUS * 2
1 0000009c 00000004- .field RTA_fromHost
1 000000a0 00000001 .field 1<<0 ; mask
1 000000a4 00000000- .field RTA_fromHost$pipe ; pipe
1
1 .if ($symcmp("RTDX","RTDX") == 0)
1
1 ; allocate RTDX_channel
TMS320C6x COFF Assembler Version 4.00 Fri Feb 16 15:50:54 2001
Copyright (c) 1996-2000 Texas Instruments Incorporated
rombioscfg.s62 PAGE 16
1 0000000c RTA_fromHost$rtdx .usect ".hst", STD_TARGWORDMAUS * 3, STD_TARGWORDMAUS
1
1 000000a8 .sect ".cinit"
1
1 .align 8
1
1 000000a8 0000000C .field STD_TARGWORDMAUS * 3
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -