home bbs files messages ]

Just a sample of the Echomail archive

<< oldest | < older | list | newer > | newest >> ]

 Message 58 
 Robert AH Prins to All 
 Re: FPC - trying again :( 
 10 Jan 12 10:04:47 
 
Thunderbird/9.0.1
mp.lang.pascal.misc:211
From: Robert AH Prins 

On 2012-01-10 07:58, Adrian Devries wrote:
> Before I try to compile your sources with fpc, I try to compile it with
> vpc. With the following batch
>
> @echo off
> :Main
> setlocal
> set  DevDir=c:\01-lift\vp\dev
> set     VPC=c:\vp21\bin.w32\vpc -M -V%DevDir%
> set   Progs=chkdat dat2csv dat2txt dayform get-aud h-h2rtf lift \
> newlift h-h2wiki
> set LogFile=%~dpn0.log
> type nul>"%LogFile%"
> pushd "%~dp0"
> if not exist "%DevDir%" (md "%DevDir%")
> copy /y ..\source\*.* "%DevDir%\" 1>nul
> copy /y ..\vpo\*.*    "%DevDir%\" 1>nul
> pushd "%DevDir%"
> touch *.pas *.vpo
> for %%a in ( %Progs% ) do (
> 	if "%%~a"=="get-aud" (sed -i -r -e "s_d:_c:_g" "%%~a.vpo"&  \ del /f /q
> sed*.)
> 	%VPC%\%%~a.vpo | tee -a "%LogFile%"
> )
> popd
> popd
> endlocal
> pause
> goto :EOF
> :EOF
>
> I get following results:
>
> Virtual Pascal  Version 2.1.279  Copyright (C) 2000-2004 vpascal.com
>                  Built in London, UK on 9 May 2004 by build@vpascal.com
>
> c:\01-lift\vp\dev\chkdat.pas(1)
> c:\01-lift\vp\dev\chkdat.pas(27): Error 15: File 'hhcommon.vpi' is not found
>    hhcommon;
> ..........^
>
> (...)
>
> The file get-aud.vpo contains incorrect path settings; the batch
> corrects it on the fly. But the main problem is the missing hhcommon stuff.

hhcommon.pas should compile to hhcommon.vpi/hhcommon.lib, a "Make" (F9) 
in the IDE should create the critter, in my case in "C:\vp21\out.w32\units"

FWIW, my VP install is the one that is created by the VP installer, i.e. 
in c:\vp21, with only the CHM (from Ning) documentation added to the 
vp21\doc library.

Robert
-- 
Robert AH Prins
robert(a)prino(d)org

--- Internet Rex 2.31
 * Origin: The gateway at Omicron Theta (1:261/20.999)

<< oldest | < older | list | newer > | newest >> ]

(c) 1994,  bbs@darkrealms.ca