home *** CD-ROM | disk | FTP | other *** search
- echo off
- if /%1==/ goto HELP
- if /%1==?/ goto HELP
-
- echo Medium model library
- tlib %1cm *gexit *gfreemem *ggetmem
- if errorlevel 1 goto ERROR
- patch gexit.cm gexit.obj
- patch gfreemem.cm gfreemem.obj
- patch ggetmem.cm ggetmem.obj
- tlib %1cm -+gexit -+gfreemem -+ggetmem
- if errorlevel 1 goto ERROR
- del %1cm.bak
-
- echo Large model library
- tlib %1cl *gexit *gfreemem *ggetmem
- if errorlevel 1 goto ERROR
- patch gexit.cl gexit.obj
- patch gfreemem.cl gfreemem.obj
- patch ggetmem.cl ggetmem.obj
- tlib %1cl -+gexit -+gfreemem -+ggetmem
- if errorlevel 1 goto ERROR
- del %1cl.bak
-
- echo Huge model library
- tlib %1ch *gexit *gfreemem *ggetmem
- if errorlevel 1 goto ERROR
- patch gexit.ch gexit.obj
- patch gfreemem.ch gfreemem.obj
- patch ggetmem.ch ggetmem.obj
- tlib %1ch -+gexit -+gfreemem -+ggetmem
- if errorlevel 1 goto ERROR
- del %1ch.bak
-
- goto OK
-
- :HELP
- echo Syntax is: patchit lib-directory
- echo -----------------------------------
- echo Example: patchit c:\turboc\lib\
- goto OK
-
- :ERROR
- echo Errors !!!!
- :OK