[Info-vax] Native compilers
Bill Gunshannon
bill.gunshannon at gmail.com
Sat Feb 19 16:56:47 EST 2022
On 2/19/22 16:09, VAXman- at SendSpamHere.ORG wrote:
> In article <surhbf$jt$1 at dont-email.me>, Dave Froble <davef at tsoft-inc.com> writes:
>> On 2/19/2022 1:22 PM, John Reagan wrote:
>>> With all the various threads talking about compilers and such, here's a "demo" (compilers are hard to demo) of a the native Macro compiler.
>>>
>>> $ type hw.mar
>>> .TITLE hello
>>> .PSECT RDATA,NOWRT,SHR,NOPIC,NOEXE,RD,QUAD
>>> HI: .ASCID /Hello, World!/
>>> .PSECT CODE,NOWRT,SHR,PIC,EXE,RD,QUAD
>>> START:: .CALL_ENTRY PRESERVE=<>,MAX_ARGS=0,HOME_ARGS=TRUE
>>> PUSHAQ HI
>>> CALLS #1,G^LIB$PUT_OUTPUT
>>> BLBC R0,10$
>>> MOVL #SS$_NORMAL,R0
>>> 10$: RET
>>> .END START
>>> $
>>> $ show system /noproc
>>> OpenVMS XG5P-H4S on node X86VMS 19-FEB-2022 13:09:56.72 Uptime 2 03:28:17
>>> $ write sys$output f$getsyi("arch_name")
>>> x86_64
>>> $ macro hw
>>> $ link hw
>>> $ run hw
>>> Hello, World!
>>>
>>>
>>
>> Great demo.
>
> ... but not great Macro. ;)
>
How's this for Macro?
.MCALL .PRINT .EXIT
MESG1: .ASCIZ " HELLO WORLD "
.EVEN
START:
.PRINT #MESG1
DONE:
; CLEAN UP AND GO BACK TO KMON
.EXIT
.END START
:-)
bill
More information about the Info-vax
mailing list