[Info-vax] Debugging a Pascal program under VMS V9.2-2
Chris Townley
news at cct-net.co.uk
Thu Apr 4 19:07:41 EDT 2024
On 04/04/2024 23:26, Single Stage to Orbit wrote:
> OK this is strange and maybe I've misundersood something but basically
> I can't exmaine values of variables, as below.
>
> ─ SRC: module START_RECEIVER -scroll-
> source─────────────────────────────────────────────────────────────────
> ────────────────────────
> 39: End;
> 40:
> 41: (* Declaration of lib$get_symbol *)
> 42: Procedure lib$get_symbol ( %DESCR symbol : Varying [$l1] of
> char;
> 43: %DESCR value : Varying [$l2] of
> char); external;
> 44:
> 45:
> 46: Var
> 47: username : Varying [15] of char;
> 48: output_dev : Varying [16] of char;
> 49:
> 50: Begin
> -> 51: translate_logical('NWAY$PATH',pathname);
> 52: translate_logical('SYS$OUTPUT',output_dev);
> 53: translate_logical('STARTREC$USERNAME',username);
> 54: username := username + '_NetV2';
> 55: status := $CREPRC( image := pathname + 'REC.EXE',
> 56: output := output_dev,
> 57: baspri := 3,
> 58: prcnam := username );
> 59: End.
> ─ OUT -
> output─────────────────────────────────────────────────────────────────
> ──────────────────────────────────────────────────────
> stepped to START_RECEIVER\START_RECEIVER\%LINE 51
> 51: translate_logical('NWAY$PATH',pathname);
>
>
>
>
>
>
>
>
>
>
>
> ─ PROMPT -error-program-
> prompt─────────────────────────────────────────────────────────────────
> ─────────────────────────────────────
> DBG> examine username
> Debugger error in RSTTYPES\DBG$STA_SYMTYPE or session corruption
> DBG> examine output_dev
> Debugger error in RSTTYPES\DBG$STA_SYMTYPE or session corruption
> DBG>
> DBG>
>
>
> Versions in use -
>
> OpenVMS x86 V9.2-2
> DEBUG V9.2-009
> PASCAL: V6.3-143 (GEM 50XC4)
>
> I have checked and I have definitely compiled the program with /DEBUG
> /NOOPTIMIZE, and linked using /DEBGU
>
> Any ideas?
Did you try linking /DEBUG ?
;}
--
Chris
More information about the Info-vax
mailing list