This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate mainline
[perl5.git] / NetWare / bat / SetNWBld.bat
CommitLineData
2986a63f 1@echo off
91c54917 2@rem AUTHOR: apc
2986a63f
JH
3@rem CREATED: Thu 18th Jan 2001 09:18:08
4@rem LAST REVISED: 6th April 2001
91c54917
NIS
5@rem LAST REVISED: 22nd May 2002
6@rem Batch file to set the path to Default Buildtype,NetWare SDK, CodeWarrior directories
7@rem This file calls buildtype with release as defualt,setnlmsdk.bat, setCodeWar.bat & setmpksdk.bat and MpkBuild with off as default
2986a63f
JH
8
9REM If no parameters are passed, display usage
10if "%1" == "" goto Usage
11if "%1" == "/?" goto Usage
12if "%1" == "/h" goto Usage
13
14REM Display the current settings
15if "%1" == "/now" goto now
16
17REM If na is passed, don't set that parameter
18if "%1" == "na" goto skip_nlmsdk_msg
91c54917 19
2986a63f
JH
20:setnwsdk
21call setnlmsdk %1
22goto skip_nlmsdk_nomsg
23
24:skip_nlmsdk_msg
25@echo Retaining NLMSDKBASE=%NLMSDKBASE%
2986a63f 26
91c54917
NIS
27:skip_nlmsdk_nomsg
28if "%2" == "" goto err_exit
29if "%2" == "na" goto skip_cw_msg
2986a63f 30
91c54917
NIS
31:setcodewar
32call setcodewar %2
33goto skip_cw_nomsg
2986a63f 34
91c54917
NIS
35:skip_cw_msg
36@echo Retaining CODEWAR=%CODEWAR%
37goto exit
2986a63f 38
91c54917 39:skip_cw_nomsg
2986a63f
JH
40goto exit
41
91c54917
NIS
42:err_exit
43@echo Not Enough Parameters
44goto Usage
45
2986a63f
JH
46:now
47@echo NLMSDKBASE=%NLMSDKBASE%
91c54917 48@echo CODEWAR=%CODEWAR%
2986a63f
JH
49goto exit
50
2986a63f
JH
51:Usage
52 @echo on
91c54917
NIS
53 @echo "Usage: setnwdef <path to NetWare SDK> <path to CodeWarrior dir>"
54 @echo "Usage: setnwdef /now" - To display current setting
2986a63f 55 @echo Pass na if you don't want to change a setting
91c54917
NIS
56 @echo Ex. setnwbld d:\ndk\nwsdk na
57 @echo Ex. setnwbld na d:\codewar
58
2986a63f 59:exit