Make engines compile on VMS for ia64 as well.

Parse file types in a more secure manner.

Submitted by sms@antinode.info (Steven M. Schweda)
This commit is contained in:
Richard Levitte 2009-08-25 07:19:25 +00:00
parent 6450908a35
commit c6e4ef2c6e
3 changed files with 2 additions and 1 deletions

1
engines/ia64.opt Normal file
View File

@ -0,0 +1 @@
SYMBOL_VECTOR=(bind_engine=PROCEDURE,v_check=PROCEDURE)

View File

@ -196,7 +196,7 @@ $!
$! Do the dirty work.
$!
$ ON ERROR THEN GOTO FILE_NEXT
$ IF FILE_NAME - ".MAR" .NES. FILE_NAME
$ IF F$EDIT(F$PARSE(SOURCE_FILE,,,"TYPE","SYNTAX_ONLY"),"UPCASE") .EQS. ".MAR"
$ THEN
$ MACRO/OBJECT='OBJECT_FILE' 'SOURCE_FILE'
$ ELSE