| $ set def swig_root:[vms] |
| $ |
| $ file = f$search("swig_root:[vms.o_alpha]*.obj") |
| $ newobj = 0 |
| $ if file .nes. "" |
| $ then |
| $ v = f$verify(1) |
| $ library/replace swig_root:[vms.o_alpha]swig.olb swig_root:[vms.o_alpha]*.obj |
| $ delete swig_root:[vms.o_alpha]*.obj;* |
| $ v = f$verify(v) |
| $ newobj = 1 |
| $ endif |
| $ file = f$search("swig_root:[vms]swig.exe") |
| $ if file .eqs. "" .or. newobj |
| $ then |
| $ v = f$verify(1) |
| $ cxxlink/exe=swig_root:[vms]swig.exe - |
| /repo=swig_root:[source.modules1_1.cxx_repository] - |
| swig_root:[vms.o_alpha]swig.olb/include=swigmain |
| $ v = f$verify(v) |
| $ endif |