[Simh] HP2100 Fortran problem

Saporito Fausto Fausto.Saporito at atosorigin.com
Thu May 17 06:47:11 EDT 2007


Hello all, 

i'm trying to use the FORTRAN compiler with the latest version of hp2100
emulator. 
I'm able to compile a sample test program (I used 6 and 2 as output
device), generating the abs file. 

FTN, B, L 
C 
      WRITE(6,99) 
C 
   99 FORMAT(4RCIAO) 
      STOP 
      END 
END$ 

After the run of new generated ABS file, the simulator stops and print a
FORTRAN error: *FMT. Inspecting the A register, the value is 000003 and,
according to the manual, it means: 

A) Illegal character in FORMAT statement 
B) Format repetition factor of zero 
C) FORMAT statement defines more character positions than possible for
device. 

Any suggestion? 

Thanks, 
Fausto 

========================================================================
==== 

The procedure I used is the following: 

set clk dev=12 
set ptr dev=13 
set ptp dev=20 
load sio16k11.abs 
load fortran1.abs 
att ptp test1.rel 
att ptr test.for 
run 100 
(the simulator stop and I have to press ^E to return to the console) 
load fortran2.abs 
att ptr test1.rel 
att ptp test2.rel 
run 100 
(the simulator exit with T-reg 102077) 
set clk dev=13 
set ptr dev=10 
set ptp dev=12 
load bcs16k.abs 
de s 140000 
att ptp test.abs 
att ptr test2.rel 
run 2 
(the simulator stops and print *LOAD) 
de s 140004 
att ptr bcslib.rel 
run 
(the simulator stops and print *L08 - i.e. No transfer address,
according to the manual I have to set the absolute address in the switch
register and press LOAD ADDRESS. I found this can be simulated
depositing in the A register an octal value)

de a 000002 
run 
(the simulator stops and print *LST) 
run 
(the simulator stops and print *END and the abs file is generated on the
ptp device) 
load test.abs 
de s 000000 
run 2000 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.trailing-edge.com/pipermail/simh/attachments/20070517/169a4c66/attachment-0003.html>


More information about the Simh mailing list