[fpc-pascal] InterlockedCompareExchange64 and Win64

2007-09-20 Thread Michał Niklas 

Hello,

I have compiled multithreaded Windows/Linux console app (server) with 
FPC for Win32/Linux and ppcrossx64.exe for Win64.  It compiled, but when 
I try to execute it I got:


The procedure entry point InterlockedCompareExchange64 could not be 
located in the dynamic link library kernel32.dll.


I tried it on Windows XP Profesional 64bit Edition.

MSDN http://msdn2.microsoft.com/en-us/library/ms683562.aspx
claims that InterlockedCompareExchange64() is not available
for this system:

Requirements:
Client: Requires Windows Vista.
Server: Requires Windows Server 2008 or Windows Server 2003.

Of course I do not use this function directly.
I have found 'InterlockedCompareExchange64' in:
c:\Fpc\2.2.0\units\x86_64-win64\rtl\system.o
but my simple (non threaded) 64 bit apps works.

How can I got out of InterlockedCompareExchange64()?

Regards,
Michal Niklas
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] Win64, ppcrossx64 and resource compiler not found

2007-09-20 Thread Michał Niklas 

Hello,

Trying to compile Win64 app with resources I got:
Error: resource compiler not found, switching to external mode

I have:
{$R appver.res}

In my source, and appver.res was compiled from .rc file by Borland 
brcc32 (the one that comes with Turbo Delphi).


What should I do to add resource to my Win64 app?

Regards,
Michal Niklas
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Compiling a program for openwrt?

2007-09-20 Thread Florian Klaempfl 
Luca Olivetti schrieb:
> Hello,
> 
> I received a message from a user that's trying to use my program with
> openwrt.

At least the WRT54 is MIPS based. Is the user's system really an arm?
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Compiling a program for openwrt?

2007-09-20 Thread Luca Olivetti 

En/na Florian Klaempfl ha escrit:

Luca Olivetti schrieb:

Hello,

I received a message from a user that's trying to use my program with
openwrt.


At least the WRT54 is MIPS based. Is the user's system really an arm?


Good question. He has an asus wl500g premium, and according to the table 
of hardware it's mips based. I'll tell him that.

Thank you
--
Luca
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] FPUCW in a .dll

2007-09-20 Thread Adrian Veith 

Hi,

a .dll written in fpc changes the FPUCW when it is loaded. I think, that 
this is the wrong behavior, because it should be the task of the loading 
program to setup the FPUCW. As far as I can see, a Delphi .dll doesn't 
change the FPUCW.


Cheers,

Adrian.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] lmysqlclient not found again while compile in fedora 7

2007-09-20 Thread Andi Purwito 
I have just update my fpc to v2.2.0 under fedora 7. But error occured while 
compile program that uses mysql4, "lmysqlclient not found". Even 
after make symbolic link to /usr/lib/mysql/...I have no idea why this always 
happen again every migrate. Thanks


   

Pinpoint customers who are looking for what you sell. 
http://searchmarketing.yahoo.com/
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] destructor TDecompressionStream.Destroy question

2007-09-20 Thread David Mears 
from fpc/packages/fcl-base/src/inc/zstream.pp

I'm not really sure why this is in the destructor for tdecompressionstream.

  if FZRec.avail_in <> 0 then
Source.Seek(-FZRec.avail_in, soFromCurrent);

my tdecompressionstream  is fed by a tideadecryptstream - when
tdecompressionstream is freed it causes that seek in the decrypt for
some reason? , which isn't supported by the tdecryptionstream and it
throws a EIDEAError - or is there a problem with the source stream? 

generally I feel that exceptions are somehow uncivilized, so avoiding
one so totally unnecessary  (in context, at least) would be appreciated.
 
Dave

___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] destructor TDecompressionStream.Destroy question

2007-09-20 Thread Michael Van Canneyt 


On Thu, 20 Sep 2007, David Mears wrote:

> from fpc/packages/fcl-base/src/inc/zstream.pp
> 
> I'm not really sure why this is in the destructor for tdecompressionstream.
> 
>   if FZRec.avail_in <> 0 then
> Source.Seek(-FZRec.avail_in, soFromCurrent);

To reposition the source stream on the last actually read data.

 
> my tdecompressionstream  is fed by a tideadecryptstream - when
> tdecompressionstream is freed it causes that seek in the decrypt for
> some reason? , which isn't supported by the tdecryptionstream and it
> throws a EIDEAError - or is there a problem with the source stream? 

No, this is "normal".

> 
> generally I feel that exceptions are somehow uncivilized, so avoiding
> one so totally unnecessary  (in context, at least) would be appreciated.

I'll introduce a property in TDecompressionstream: 'SourceSeekable' or so
which can be used to control the behaviour.

Another solution is to implement a long-standing idea of mine: 

to introduce a property in TStream:
  StreamCapabilities : TStreamCapabilities;
with
  TStreamCapability = (scSeekForward,scSeekBackward,scRead,scWrite,scSize);
  TStreamCapabilities = set of TStreamCapability;

I think I'll go for the latter one.

Michael.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal