diff --git a/OpenVMS/startup.com b/OpenVMS/startup.com new file mode 100644 index 0000000000000000000000000000000000000000..7b642a1f1979208438727e637af0c7ac1231c1aa_T3BlblZNUy9zdGFydHVwLmNvbQ== --- /dev/null +++ b/OpenVMS/startup.com @@ -0,0 +1,14 @@ +$ this = f$environment("PROCEDURE") +$ this_dir = f$parse(this,,,"DEVICE") + f$parse(this,,,"DIRECTORY") +$ define/system/exec/nolog LIBCJSON 'this_dir' +$ +$ define/system/exec/nolog CJSONSHR32 LIBCJSON:CJSONshr32.exe +$ define/system/exec/nolog CJSONSHR64 LIBCJSON:CJSONshr64.exe +$ +$ if .not. f$file_attributes("CJSONshr32","KNOWN") +$ then +$ install add 'p1' CJSONSHR32 +$ else +$ install replace CJSONSHR32 +$ endif +$