25 lines
249 B
ArmAsm
25 lines
249 B
ArmAsm
/
|
|
/
|
|
|
|
/ xe -- temp file junk
|
|
|
|
.globl tfildiag
|
|
.globl tfil1, tfil2
|
|
|
|
tfildiag:
|
|
mov $1,r0
|
|
sys write; mes1; emes1-mes1
|
|
clr r0
|
|
sys seek; 0; 2
|
|
mov $-1,r0 / failure return
|
|
sys exit
|
|
|
|
mes1:
|
|
<Temp file?\n>
|
|
emes1:
|
|
tfil1:
|
|
<f.tmp1\0>
|
|
tfil2:
|
|
<f.tmp2\0>
|
|
|