[Info-vax] VMS Software Q1 '23 Update

[Arne Vajhøj]

On 1/29/2023 7:24 PM, Arne Vajhøj wrote:
> Experiment:
> 
> $ type d.bas
> program d
> 
> declare double x, y, z
> 
> x = 12.34
> y =  45.67
> z = x + y
> 
> print z
> 
> end program
> $ bas/noop/list/mach d
> $ sear d.lis cvtdg,addg,cvtgd
> 57EA13CA     0060               CVTDG   F10, F10
> 57EB13CB     0068               CVTDG   F11, F11
> 554B140A     0070               ADDG    F10, F11, F10
> 57EA15AA     0074               CVTGD   F10, F10
> 
> Looks like G math to me.
> 
> (it does something smart with /OPT so that is why the /NOOP is used)

To prevent the compiler from being smart:

$ type dd.bas
function double add(double x, double y)

add = x + y

end function
$ bas/list/mach dd
$ sear dd.lis cvtdg,addg,cvtgd
57E013C0     00A0               CVTDG   F0, F0
57E113C1     00B0               CVTDG   F1, F1
54011400     00B4               ADDG    F0, F1, F0
57E015A2     00B8               CVTGD   F0, ADD 
        ; F0, F2

Arne