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
1 @echo off
2 @rem AUTHOR: apc
3 @rem CREATED: Thu 18th Jan 2001 09:18:08
4 @rem LAST REVISED: 6th April 2001
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
8
9 REM If no parameters are passed, display usage
10 if "%1" == "" goto Usage
11 if "%1" == "/?" goto Usage
12 if "%1" == "/h" goto Usage
13
14 REM Display the current settings
15 if "%1" == "/now" goto now
16
17 REM If na is passed, don't set that parameter
18 if "%1" == "na" goto skip_nlmsdk_msg
19
20 :setnwsdk
21 call setnlmsdk %1
22 goto skip_nlmsdk_nomsg
23
24 :skip_nlmsdk_msg
25 @echo Retaining NLMSDKBASE=%NLMSDKBASE%
26
27 :skip_nlmsdk_nomsg
28 if "%2" == "" goto err_exit
29 if "%2" == "na" goto skip_cw_msg
30
31 :setcodewar
32 call setcodewar %2
33 goto skip_cw_nomsg
34
35 :skip_cw_msg
36 @echo Retaining CODEWAR=%CODEWAR%
37 goto exit
38
39 :skip_cw_nomsg
40 goto exit
41
42 :err_exit
43 @echo Not Enough Parameters
44 goto Usage
45
46 :now
47 @echo NLMSDKBASE=%NLMSDKBASE%
48 @echo CODEWAR=%CODEWAR%
49 goto exit
50
51 :Usage
52  @echo on
53  @echo "Usage: setnwdef <path to NetWare SDK> <path to CodeWarrior dir>"
54  @echo "Usage: setnwdef /now" - To display current setting
55  @echo Pass na if you don't want to change a setting
56  @echo Ex. setnwbld d:\ndk\nwsdk na
57  @echo Ex. setnwbld na d:\codewar
58
59 :exit