[Info-vax] Debugging a Pascal program under VMS V9.2-2

[Arne Vajhøj]

On 4/4/2024 6:26 PM, Single Stage to Orbit wrote:
>      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;

Curious. Any reason you don't do:

[inherit('sys$library:pascal$lib_routines')]

?

You will need to use all 3 arguments, but not a problem.

Example:

    q : varying [255] of char;
    ...
    lib$get_symbol('QUERY_STRING', q.body, q.length);


Arne