15 lines
368 B
Batchfile
15 lines
368 B
Batchfile
@echo Free Pascal Compiler test...
|
|
@echo For error messages, see fpctest.err.
|
|
@echo off
|
|
@if "%1"=="" goto usage
|
|
@if not exist %1. goto invpath
|
|
@del fpctest.err
|
|
@make file=%2 fpc=%1 -fMakefile.fpc
|
|
@type fpctest.err
|
|
@goto exit
|
|
:invpath
|
|
@echo invalid path "%1"
|
|
@goto exit
|
|
:usage
|
|
@echo usage: fpctest ^<path to fpc installation^> ^<unit to test^>
|
|
:exit |