HP OpenVMS Systems

ask the wizard

Debugger SHOW CALLS and BASIC?

» close window

The Question is:

 
Hi,
When running a Basic program with debugger on VAX setting a break point at the
 error handler the show calls command gives the line number at which the error
 occured.
How can we get the same information when running a program on AXP?
 
For example:
1 on error go to 5
2 input A
3 print a/0.
4 go to 10
5 print ert$(err)
6 resume 10
10 end
 
We set the break point to line 5.
When running on AXP issuing SHOW CALLS gave:
*Y$MAIN  Y$MAIN   5    rel PC   abs PC
 
When running on VAX issuing SHOW CALLS gave:
*Y$MAIN  Y$MAIN   5    rel PC   abs PC
SHARE$BASRTL
SHARE$BASRTL
----above condition...
%systrm-f-fltdiv_f...
----end of exception...
*Y$MAIN  Y$MAIN   3    rel PC   abs PC
(This is the information we need on the AXP)
 
Thank you,
Haim Pri-Tal

The Answer is :

 
  The OpenVMS Wizard would initially assume the desired behaviour would
  result from the use of /DEBUG/NOOPTIMIZE or similar compilation options.
 
 
$ cre x.bas
1 on error go to 5
2 input A
3 print a/0.
4 go to 10
5 print ert$(err)
6 resume 10
10 end
 Exit
$ bas/noopt/deb x
$ lin/deb x
$ r x
 
         OpenVMS Alpha Debug64 Version V7.2X-015
 
%DEBUG-I-INITIAL, Language: BASIC, Module: X$MAIN
 
DBG> set bre %line 5
DBG> Go
? 10
break at X$MAIN\%LINE 5
     5: 5 print ert$(err)
break at X$MAIN\%LINE 5
DBG> sho call
 module name     routine name      line           rel PC           abs PC
*X$MAIN          X$MAIN               5       00000000000000EC 00000000000200EC
                                              FFFFFFFF8D50B4DC FFFFFFFF8D50B4DC
DBG>
 

  
     
     answer written or last revised on ( 13-SEP-2000 )
     » close window