X-Git-Url: https://git.openssl.org/?p=openssl.git;a=blobdiff_plain;f=VMS%2Fmkshared.com;h=1356fb9dd7fa2403bfe29654d373576f83792c6e;hp=455b2306163d0f8963c6c188de7c2f63747138b4;hb=78e91e7574133ec77d55626f8378c9457fe63950;hpb=b31ccc362cf1bd27b1f292f67c799cb5296ca73e

diff --git a/VMS/mkshared.com b/VMS/mkshared.com
index 455b230616..1356fb9dd7 100644
--- a/VMS/mkshared.com
+++ b/VMS/mkshared.com
@@ -165,11 +165,11 @@ $   type sys$input:/out=mar:
 	.TRANSFER routine
 	.MASK	routine
 	JMP	routine+2
-	.ENDM TRANSFER_ENTRY
+	.ENDM FTRANSFER_ENTRY
 ;
 ; Place entries in own program section.
 ;
-$   write mar "	.PSECT $$",libvec,"QUAD,PIC,USR,CON,REL,LCL,SHR,EXE,RD,NOWRT"
+$   write mar "	.PSECT $$",libvec,",QUAD,PIC,USR,CON,REL,LCL,SHR,EXE,RD,NOWRT"
 $   write mar libvec,"_xfer:"
 $   libwrch   := mar
 $   libwriter := write_vax_ftransfer_entry
@@ -179,8 +179,8 @@ $   type sys$input:/out=mar:
 ; Allocate extra storage at end of vector to allow for expansion.
 ;
 $   write mar "	.BLKB 32768-<.-",libvec,"_xfer>	; 64 pages total."
-$   libwriter := write_vax_vtransfer_entry
-$   gosub read_func_num
+$!   libwriter := write_vax_vtransfer_entry
+$!   gosub read_func_num
 $   write mar "	.END"
 $   close mar
 $   open/write opt 'libopt'
@@ -202,7 +202,7 @@ $   type sys$input:/out=opt:
 PSECT_ATTR=$CHAR_STRING_CONSTANTS,NOWRT
 $   libwrch   := opt
 $   libwriter := write_vax_psect_attr
-$   gosub read_var_num
+$   gosub read_func_num
 $   close opt
 $   macro/obj='libobj' 'libmar'
 $   link/map='libmap'/full/share='libgoal' 'libopt'/option
@@ -266,6 +266,7 @@ $             falsesum = falsesum + 1
 $         endif
 $         if plat_entry .eqs. "VMS" then truesum = truesum + 1
 $         if plat_entry .eqs. "!VMS" then falsesum = falsesum + 1
+$	  goto loop1
 $       endif
 $     endloop1:
 $!DEBUG!$     if info_platforms - "EXPORT_VAR_AS_FUNCTION" .nes. info_platforms
@@ -284,7 +285,9 @@ $       if alg_entry .eqs. "" then goto loop2
 $       if alg_entry .nes. ","
 $       then
 $         if alg_entry .eqs. "KRB5" then goto loop ! Special for now
+$	  if alg_entry .eqs. "STATIC_ENGINE" then goto loop ! Special for now
 $         if f$trnlnm("OPENSSL_NO_"+alg_entry) .nes. "" then goto loop
+$	  goto loop2
 $       endif
 $     endloop2:
 $     if info_platforms - "EXPORT_VAR_AS_FUNCTION" .nes. info_platforms