home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
ddkx86v1.zip
/
DDKX86
/
setup
/
COPYCSET.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-04-10
|
1KB
|
65 lines
/* */
parse upper arg cset basename .
parse source . . command .
command = FILESPEC( 'Name', command )
i = POS( '.', command )
if i <> 0 then
command = substr( command, 1, i - 1 )
if cset = '' then
do
say
say 'Usage:' command 'CSET/2_PATH DDK_PATH'
say
say ' Where:'
say ' CSET/2_PATH is the path to the IBM CSET/2 compiler.'
say ' e.g. D:\IBMC'
say
say ' DDKPATH is the path where the DDK has been installed. '
say ' e.g. D:\DDKx86'
exit
end
ibmcdirs.1 = 'bin'
ibmcdirs.2 = 'dll'
ibmcdirs.3 = 'help'
ibmcdirs.4 = 'include'
ibmcdirs.5 = 'lib'
ibmcdirs.6 = 'locale'
ibmcdirs.0 = 6
do i = 1 to ibmcdirs.0
'XCOPY' cset'\'ibmcdirs.i basename'\ibmc\c'ibmcdirs.i'\ /e/s/v'
if rc <> 0 then
do
say
say 'Error to copying' cset'\'ibmcdirs.i 'to' basename'\ibmc\c'ibmcdirs.i
say 'Directory bypassed.'
say
end
end
exit