The DMPT comes from the LoaDWord instruction choking on the half-word aligned
address that is in GR26. Seems like an alignment problem with RNDFACTOR. Where does
RNDFACTOR come from?
Is it declared COMMON?
Is it the return from some other function?

What might help is to run again with ...;debug and set a breakpoint at FTN_DO_R4IO
and dump the registers. I don't know the calling sequence to this function but am
guessing we'll see the same address in GR26.

nmdebug> b FTN_DO_R4IO,,,{tr,i,d;dr;c}

<shot from hip> Try putting a dummy INTEGER*2 in front and/or behind the
declaration for RNDFACTOR to change its alignment. Or better yet, turn on the
compiler option to dump the addresses of variables and recompile and keep the
listing on disc. May help to shed some light.

James English wrote:

> To all,
>
> Every time I run my Fortran program, I'm getting the message shown below.
> I'm running on an HP-3000/987rx with MPE/ix 5.5 and CA/MANMAN software. The
> program is running in OMAR.
>
>  From using the HP Symbolic Debugger, I've determined that it is blowing up
> when trying to reference a variable in my Format statement (i.e,
> "FORMAT(X,F8.<RNDFACTOR>"), where RNDFACTOR is the variable in question.
>
> Based on what's shown below, what should I be looking for in my code, and
> how do I fix it?
>
> Thanks,
>
> Jim.
>
> **** Data memory protection trap (TRAPS 68).
>
> ABORT: UT970.FPUB.TBWDEV
>         PC=2535.00046950 FTN_I4_DEREF+$4
> NM* 0) SP=41846f08 RP=2535.000469f4 FTN_LOOKUP_VAR_FMT+$5c
> NM  1) SP=41846f08 RP=2535.00036588 SHUFL_+$ec
> NM  2) SP=41846ed0 RP=2535.00038738 IO_TN1+$1d18
> NM  3) SP=41846e10 RP=2535.0004d434 FTN_DO_R4IO+$a8
> NM  4) SP=41846a58 RP=2535.0004d378 ?FTN_DO_R4IO+$8
>           export stub: 1965.000160c4 ut970+$6b5c
> NM  5) SP=418469f0 RP=1965.00000000
>       (end of NM stack)
>
> R0 =00000000 41642000 000469f7 467d3ae4 R4 =00000001 467d3820 41846be8 00000008
> R8 =41846b58 00000000 00000008 00000000 R12=00000001 41639888 ffff8044 00000004
> R16=00000000 00000000 00000000 00031728 R20=00000000 00000009 00000009 00000002
> R24=00000002 467d3820 41846756 41642000 R28=ffff8000 00000020 41846f08 0000001e
>
> IPSW=000cff0f=jthlnxBCvmrQPDI  PRIV=3   SAR=0010 PCQF=2535.46953 2535.469f7
>
> SR0=0000000a 00001e99 00000000 00000000 SR4=00002535 00001e99 0000000b 0000000a
> TR0=00000006 418473e0 00e5ee6c 00000000 TR4=00000000 d440b734 d440b734 e01c20f4
> PID1=07ae=03d7(W) PID2=0000=0000(W)     PID3=0000=0000(W) PID4=0000=0000(W)
>
> RCTR=00000000 ISR=00001e99 IOR=41846756 IIR=4b5c0000 IVA=00146000 ITMR=116180b8
> EIEM=ffffffff EIRR=00000000 CCR=00c0
>
> **** PROCESS ABORT INTERACTIVE DEBUG FACILITY ****
> $2 ($2f5) nmdebug > dr
>
> R0 =00000000 41642000 000469f7 467d3ae4 R4 =00000001 467d3820 41846be8 00000008
> R8 =41846b58 00000000 00000008 00000000 R12=00000001 41639888 ffff8044 00000004
> R16=00000000 00000000 00000000 00031728 R20=00000000 00000009 00000009 00000002
> R24=00000002 467d3820 41846756 41642000 R28=ffff8000 00000020 41846f08 0000001e
>
> IPSW=000cff0f=jthlnxBCvmrQPDI  PRIV=3   SAR=0010 PCQF=2535.46953 2535.469f7
>
> SR0=0000000a 00001e99 00000000 00000000 SR4=00002535 00001e99 0000000b 0000000a
> TR0=00000006 418473e0 0180410c 00000000 TR4=00000000 d440b734 d440b734 e01c20f4
> PID1=07ae=03d7(W) PID2=0000=0000(W)     PID3=0000=0000(W) PID4=0000=0000(W)
>
> RCTR=00000000 ISR=00001e99 IOR=41846756 IIR=4b5c0000 IVA=00c65000 ITMR=116180b8
> EIEM=ffffffff EIRR=00000000 CCR=00c0$3 ($2f5) nmdebug > dc pc
>
> USER $2535.46950
> 00046950  FTN_I4_DEREF+$4      4b5c0000  LDW      0(0,26),28$4 ($2f5)
> nmdebug >
>
> --------------------------------
> Jim English
> Financial Systems Analyst
>
> TB Wood's Incorporated
> 440 N. Fifth Avenue
> Chambersburg, PA 17201-1778
> Phone: (717) 264-7161 x2119
> Fax: (717) 264-0890
> E-Mail: [log in to unmask]