Re: [fpc-pascal] TFPHTTPClient Post works with jetty, fails with tomcat
On Thu, 9 Feb 2012, Mattias Gaertner wrote:
On Tue, 7 Feb 2012 10:33:04 +0100
Rainer Stratmann wrote:
Am Monday 19 December 2011 01:22:18 schrieb Mattias Gaertner:
Hi,
For some reason TFPHTTPClient.Post hangs when accessing a "solr"
server over "tomcat". It works with "solr" over "jetty".
"curl" works fine with both, so I guess the tomcat server works
normally.
Here is the code:
client:=TFPHTTPClient.Create(nil);
client.RequestHeaders.Add('Content-Type: text/xml');
client.RequestBody:=ms; // a TMemoStream with some xml to post
client.Post(URL);
It hangs here:
procedure TFPCustomHTTPClient.ReadResponse
...
else if L<0 then
// No content-length, so we read till no more data available.
Repeat
R:=Transfer(ReadBufLen);
until (R=0);
If you have no content-length then mostly in the header ist a
field 'Transfer-Encoding: chunked'. Then the content is send in snippets. It
is exactly defined how long to read until there is no more content.
http://en.wikipedia.org/wiki/Chunked_transfer_encoding
Thanks for the hint. I implemented chunked reading and now it works
fast without timeouts. :)
Did you implement this in TFPCustomHTTPClient itself ?
If so, please provide a patch.
Michael.
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] TFPHTTPClient Post works with jetty, fails with tomcat
On Thu, 9 Feb 2012 09:43:55 +0100 (CET) Michael Van Canneyt wrote: > > > On Thu, 9 Feb 2012, Mattias Gaertner wrote: > > > On Tue, 7 Feb 2012 10:33:04 +0100 > > Rainer Stratmann wrote: > > >[...] > >> If you have no content-length then mostly in the header ist a > >> field 'Transfer-Encoding: chunked'. Then the content is send in snippets. > >> It > >> is exactly defined how long to read until there is no more content. > >> > >> http://en.wikipedia.org/wiki/Chunked_transfer_encoding > > > > Thanks for the hint. I implemented chunked reading and now it works > > fast without timeouts. :) > > Did you implement this in TFPCustomHTTPClient itself ? Yes, it seems the right place. > If so, please provide a patch. I will do after some more tests. Mattias ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] What ARM targets are supported by FPC?
On 9 February 2012 00:05, Jorge Aldo G. de F. Junior wrote: > No need, > > this guy ported the whole DirectFB stuff to freepascal : Thanks, I'll take a look. -- Regards, - Graeme - ___ fpGUI - a cross-platform Free Pascal GUI toolkit http://fpgui.sourceforge.net ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Re: FPCDocs: diff: saving fpdoc gives huge diff
On 9-2-2012 0:56, Mattias Gaertner wrote: > On Wed, 8 Feb 2012 16:03:05 +0100 > Mattias Gaertner wrote: >> [...] >> Of course it would be nicer if the used xml readers/writers can be told >> to keep the spaces. Especially for version control systems. >> I will take a look. > The xml reader/writer used by the fpdoc editor now preserve the > attribute order and have options to preserve white spacing. > This means the fpdoc editor now only changes the edited element and > keeps the rest. Great, thanks a lot, Mattias! > There are still some whitespace issues about the edited element. What waldo said ;) Thanks, Reinier ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] TLinkedList
Hello, If my memory is not misleading me, there was once a TLinkedList class under Classes unit, but I can't find any documentation on it. I found an include file that contains it, but it is not meant for the interface part. Is there a reason for this ? Should I use records instead ? Thanks, Ido ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Request to fix 2124, was: Code works on Linux x64 but not on Linux x86
On 8-2-2012 4:14, Reinier Olislagers wrote: > Raised bug 21242 Marco v.d. Voort suggested turning off the include for i386 assembly code. This fixed the problem (in FPC fixes 2.6, bzip2 code identical with trunk). I've also uploaded a test case to mantis. Could somebody comment out the assembly include? Thanks, Reinier ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] tzipper issue(zipper.pp)
On 09/02/12 05:09, Tony Caduto wrote: The original app zipped the contents of a memo(using vclzip) which was saved to a stream, and the zip does not get stored in a file, rather a tmemorystream, whichis then sent to a client app via a socket. The functions 'compress' and 'uncompress' in units zCompr.pas and zUncompr.pas will do what you want, although using an array of Byte instead of a TMemorystream. The units are in packages/paszlib/src in the fpc source tree. Malcolm ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
[fpc-pascal] Pass array of record as parameter
Hi,
TInfo=record
s: string;
i: integer;
end;
function func1(a: array of TInfo);
how can i pass the parameter to that function?
for example, i cant do that?
func1([('test1', 1), ('test2', 2)]);
--
I am using last reversion of Lazarus, FPC 2.6
Thanks in advance
Zaher Dirkey
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
That`s a question of mine too.
Em 09/02/2012, às 15:17, Zaher Dirkey escreveu:
> Hi,
>
> TInfo=record
> s: string;
> i: integer;
> end;
>
> function func1(a: array of TInfo);
>
> how can i pass the parameter to that function?
>
> for example, i cant do that?
>
> func1([('test1', 1), ('test2', 2)]);
>
> --
> I am using last reversion of Lazarus, FPC 2.6
>
> Thanks in advance
>
> Zaher Dirkey
>
> ___
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Define a pointer type for TInfo then pass the pointer to the function.
Dereference the pointer within the function to access the array.
Thomas Young
330-256-7064
www.tygraphics.net
Sent from my iPhone
On Feb 9, 2012, at 12:17 PM, Zaher Dirkey wrote:
> Hi,
>
> TInfo=record
> s: string;
> i: integer;
> end;
>
> function func1(a: array of TInfo);
>
> how can i pass the parameter to that function?
>
> for example, i cant do that?
>
> func1([('test1', 1), ('test2', 2)]);
>
> --
> I am using last reversion of Lazarus, FPC 2.6
>
> Thanks in advance
>
> Zaher Dirkey
>
> ___
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Could you give an example? If not bother much.
Em 09/02/2012, às 15:45, Thomas Young escreveu:
> Define a pointer type for TInfo then pass the pointer to the function.
> Dereference the pointer within the function to access the array.
>
> Thomas Young
> 330-256-7064
> www.tygraphics.net
> Sent from my iPhone
>
> On Feb 9, 2012, at 12:17 PM, Zaher Dirkey wrote:
>
>> Hi,
>>
>> TInfo=record
>> s: string;
>> i: integer;
>> end;
>>
>> function func1(a: array of TInfo);
>>
>> how can i pass the parameter to that function?
>>
>> for example, i cant do that?
>>
>> func1([('test1', 1), ('test2', 2)]);
>>
>> --
>> I am using last reversion of Lazarus, FPC 2.6
>>
>> Thanks in advance
>>
>> Zaher Dirkey
>>
>> ___
>> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
>> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
> ___
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
This is how I would do that. There may be a better way. > TInfo=record > s: string; > i: integer; > end; > ATInfo = array[1..100] of TInfo; ATInfoPtr = ^ATInfo; Var A:ATInfoPtr; > function func1(a:ATInfoPtr); Thomas Young 330-256-7064 www.tygraphics.net Sent from my iPhone On Feb 9, 2012, at 12:24 PM, Everton Vieira wrote: >> TInfo=record >> s: string; >> i: integer; >> end; >> >> function func1(a: array of TInfo); ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Thanks. Em 09/02/2012, às 15:53, Thomas Young escreveu: > This is how I would do that. There may be a better way. > >> TInfo=record >> s: string; >> i: integer; >> end; >> > ATInfo = array[1..100] of TInfo; > ATInfoPtr = ^ATInfo; > > Var > A:ATInfoPtr; > >> function func1(a:ATInfoPtr); > > Thomas Young > 330-256-7064 > www.tygraphics.net > Sent from my iPhone > > On Feb 9, 2012, at 12:24 PM, Everton Vieira wrote: > >>> TInfo=record >>> s: string; >>> i: integer; >>> end; >>> >>> function func1(a: array of TInfo); > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
New(A); >> function func1(a:ATInfoPtr); var Name:string; N:integer; begin N:= 1; Name:= a^[n].s; end; Thomas Young 330-256-7064 www.tygraphics.net Sent from my iPhone On Feb 9, 2012, at 12:53 PM, Thomas Young wrote: > This is how I would do that. There may be a better way. > >> TInfo=record >> s: string; >> i: integer; >> end; >> > ATInfo = array[1..100] of TInfo; > ATInfoPtr = ^ATInfo; > > Var > A:ATInfoPtr; > >> function func1(a:ATInfoPtr); > > Thomas Young > 330-256-7064 > www.tygraphics.net > Sent from my iPhone > > On Feb 9, 2012, at 12:24 PM, Everton Vieira wrote: > >>> TInfo=record >>> s: string; >>> i: integer; >>> end; >>> >>> function func1(a: array of TInfo); > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
On Thu, Feb 9, 2012 at 7:53 PM, Thomas Young wrote: > This is how I would do that. There may be a better way. > > TInfo=record > > s: string; > > i: integer; > > end; > > > ATInfo = array[1..100] of TInfo; > ATInfoPtr = ^ATInfo; > > Var > A:ATInfoPtr; > > function func1(a:ATInfoPtr); > > > Thomas Young > 330-256-7064 > www.tygraphics.net > Sent from my iPhone > > On Feb 9, 2012, at 12:24 PM, Everton Vieira wrote: > > TInfo=record > > s: string; > > i: integer; > > end; > > > function func1(a: array of TInfo); > > > Thanks, but that is not my expected answer, my ask about "dynamic array of record" and without define a variable to pass it by params, for example i can pass the params for array of string like this func2(['t1', 't1']); this work, but i want to extend the params info? Best Regards Zaher Dirkey ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
But they couldn't pass like this?: >> This is how I would do that. There may be a better way. >> >>> TInfo=record >>> s: string; >>> i: integer; >>> end; >>> >> ATInfo = array[1..100] of TInfo; >> >> Var >> A :ATInfo; >> >>> function func1(A); Simply passing the array var if he had declared. I guess the question of our friend was about to how to pass an array with record without the need to declare. Em 09/02/2012, às 16:01, Everton Vieira escreveu: > Thanks. > > Em 09/02/2012, às 15:53, Thomas Young escreveu: > >> This is how I would do that. There may be a better way. >> >>> TInfo=record >>> s: string; >>> i: integer; >>> end; >>> >> ATInfo = array[1..100] of TInfo; >> ATInfoPtr = ^ATInfo; >> >> Var >> A:ATInfoPtr; >> >>> function func1(a:ATInfoPtr); >> >> Thomas Young >> 330-256-7064 >> www.tygraphics.net >> Sent from my iPhone >> >> On Feb 9, 2012, at 12:24 PM, Everton Vieira wrote: >> TInfo=record s: string; i: integer; end; function func1(a: array of TInfo); >> ___ >> fpc-pascal maillist - fpc-pascal@lists.freepascal.org >> http://lists.freepascal.org/mailman/listinfo/fpc-pascal > ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
On 09/2/12 5:17, Zaher Dirkey wrote:
Hi,
TInfo=record
s: string;
i: integer;
end;
function func1(a: array of TInfo);
how can i pass the parameter to that function?
You have to declare the parameter type independently of the function
declaration. You can also do it without declaring an additional pointer
type (which is also one way to do it), since dynamic arrays already have
an implicit pointer. Something like this:
type
TInfo=record
s: string;
i: integer;
end;
TInfoArr = array of tInfo;
procedure proc1(a: TInfoArr);
implementation
procedure TForm1.Button1Click(Sender: TObject);
var rec: TInfo;
infoArr: TInfoArr = nil;
begin
SetLength(infoArr, 2);
rec.i := 1; rec.s := 'test1';
infoArr[0] := rec;
rec.i := 2; rec.s := 'test2';
infoArr[1] := rec;
proc1(infoArr);
end;
procedure proc1(a: TInfoArr);
var s: string = '';
i: integer;
begin
for i := Low(a) to High(a) do
s := s + Format('TInfo%d: s=%s, i=%d ',[i, a[i].s, a[i].i]);
Showmessage(s);
end;
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
On 09 Feb 2012, at 19:07, Zaher Dirkey wrote: > Thanks, but that is not my expected answer, my ask about "dynamic array of > record" and without define a variable to pass it by params, for example i > can pass the params for array of string like this > > func2(['t1', 't1']); this work, but i want to extend the params info? Declaring record constants inline in the code is not supported by FPC (regardless of whether it's for an array parameter, an assignment or something else). There are no plans to add support for it either. Jonas___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
RE : [fpc-pascal] Pass array of record as parameter
Thanks, but that is not my expected answer, my ask about "dynamic array of
record" and without define a variable to pass it by params, for example i
can pass the params for array of string like this
func2(['t1', 't1']); this work, but i want to extend the params info?
You can use a small helper function like this:
type
TInfo=record
s: string;
i: integer;
end;
function makeinfo(s:string;i:integer):TInfo;
begin
result.s:=s;
result.i:=i;
end;
...
func1([makeinfo('test1', 1), makeinfo('test2', 2)]);
Ludo
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
On Thu, Feb 9, 2012 at 8:10 PM, Jonas Maebe wrote: > Declaring record constants inline in the code is not supported by FPC > (regardless of whether it's for an array parameter, an assignment or > something else). There are no plans to add support for it either. Ouch :P , bad news, but it save my trying time, thanks. Zaher Dirkey ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: RE : [fpc-pascal] Pass array of record as parameter
On Thu, Feb 9, 2012 at 8:21 PM, Ludo Brands wrote:
> **
>
>
>
>
> Thanks, but that is not my expected answer, my ask about "dynamic array of
> record" and without define a variable to pass it by params, for example i
> can pass the params for array of string like this
>
> func2(['t1', 't1']); this work, but i want to extend the params info?
>
> You can use a small helper function like this:
>
>
> type
>
> TInfo=record
> s: string;
> i: integer;
> end;
> function makeinfo(s:string;i:integer):TInfo;
> begin
> result.s:=s;
> result.i:=i;
> end;
> ...
>
> func1([makeinfo('test1', 1), makeinfo('test2', 2)]);
>
>
Yes, it is good idea, i will try it :D
Best Regards
Zaher Dirkey
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
That`s a nice idea.
Em 09/02/2012, às 16:21, Ludo Brands escreveu:
>
>
>
> Thanks, but that is not my expected answer, my ask about "dynamic array of
> record" and without define a variable to pass it by params, for example i can
> pass the params for array of string like this
>
> func2(['t1', 't1']); this work, but i want to extend the params info?
>
> You can use a small helper function like this:
>
>
> type
> TInfo=record
> s: string;
> i: integer;
> end;
> function makeinfo(s:string;i:integer):TInfo;
> begin
> result.s:=s;
> result.i:=i;
> end;
> ...
>
> func1([makeinfo('test1', 1), makeinfo('test2', 2)]);
>
> Ludo
> ___
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Howard are you saying FPC has dynamic arrays? Is it documented? I've been
reading the documentation page by page and I've not seen any mention of it. I'm
far from completing the reading by the way.
If dynamic arrays are part of FPC I couldn't be more delighted. I don't
completely understand what they are exactly. Would I be right in saying they
have the advantages of a linked list without the loss of speed that I so enjoy
with arrays? Maybe linked lists are slow for me because of the way I wrote the
code. The problem I have with arrays is that I often parse postscript vector
art files. These files have to be read in a discovery mode approach because I
don't know how many paths I will encounter nor know how many vertices will be
in a path. As a result arrays are large enough to accommodate the largest path
but are way overkill for a simple path.
My hope would be that I could use a dynamic array to hold just the number of
vertices I discover in a path.
Thanks for sharing the code in your post. It fascinates me.
I'm eager to learn all I can about about the amazing things that can be done
with FPC. To all those who have been building FPC, thank you. While I have been
programming in pascal since 1986 almost daily I've relied on the basic features
of the language. Time to stretch my mind.
Thomas Young
cell: 330-256-7064
mobile email: tygraph...@me.com
On Feb 9, 2012, at 1:08 PM, Howard Page-Clark wrote:
>
> You have to declare the parameter type independently of the function
> declaration. You can also do it without declaring an additional pointer type
> (which is also one way to do it), since dynamic arrays already have an
> implicit pointer. Something like this:
>
> type
> TInfo=record
>s: string;
>i: integer;
> end;
>
> TInfoArr = array of tInfo;
>
> procedure proc1(a: TInfoArr);
>
> implementation
>
> procedure TForm1.Button1Click(Sender: TObject);
> var rec: TInfo;
>infoArr: TInfoArr = nil;
> begin
> SetLength(infoArr, 2);
> rec.i := 1; rec.s := 'test1';
> infoArr[0] := rec;
> rec.i := 2; rec.s := 'test2';
> infoArr[1] := rec;
> proc1(infoArr);
> end;
>
> procedure proc1(a: TInfoArr);
> var s: string = '';
>i: integer;
> begin
> for i := Low(a) to High(a) do
> s := s + Format('TInfo%d: s=%s, i=%d ',[i, a[i].s, a[i].i]);
> Showmessage(s);
> end;
> ___
> fpc-pascal maillist - fpc-pascal@lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
On Thu, 09 Feb 2012 19:34:06 -0500 Thomas Young wrote: > Howard are you saying FPC has dynamic arrays? Is it documented? http://wiki.freepascal.org/DYNAMIC_ARRAY R. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Thank you. Thomas Young cell: 330-256-7064 mobile email: tygraph...@me.com On Feb 9, 2012, at 9:41 PM, Reimar Grabowski wrote: > On Thu, 09 Feb 2012 19:34:06 -0500 > Thomas Young wrote: > >> Howard are you saying FPC has dynamic arrays? Is it documented? > http://wiki.freepascal.org/DYNAMIC_ARRAY > > R. > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] Pass array of record as parameter
Forgive me for being in wide-eyed wonder but my goodness this is more than a nice feature. Brilliant. I feel like a child who has played with toy blocks all these years and who now received keys to a ferrari. Thomas Young cell: 330-256-7064 mobile email: tygraph...@me.com On Feb 9, 2012, at 10:26 PM, Thomas Young wrote: > Thank you. > > Thomas Young > cell: 330-256-7064 > mobile email: tygraph...@me.com > > > > On Feb 9, 2012, at 9:41 PM, Reimar Grabowski wrote: > >> On Thu, 09 Feb 2012 19:34:06 -0500 >> Thomas Young wrote: >> >>> Howard are you saying FPC has dynamic arrays? Is it documented? >> http://wiki.freepascal.org/DYNAMIC_ARRAY >> >> R. >> ___ >> fpc-pascal maillist - fpc-pascal@lists.freepascal.org >> http://lists.freepascal.org/mailman/listinfo/fpc-pascal > > ___ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] fpc 2.7.1 for arm-embedded
On 08-02-12 17:31, Koenraad Lelong wrote: On 08-02-12 15:42, Jonas Maebe wrote: On 08 Feb 2012, at 15:31, Koenraad Lelong wrote: After some debugging, I think my compiler does not work. I'm pretty certain it outputs arm-code in stead of the needed thumb2 code. The error below indicates the compiler does not get to emitting any kind of code at all. What I say above is from a crosscompiler made with 2.6.0. Below is what I get when I try to make a new crosscompiler, using svn 20278. I just tried to make a crosscompiler using svn 20278, which fails : I did another experiment. I make a zip-file with a 2.7.1 compiler and its sources. I installled this on a brand new virtual machine with OpenSuse, so no fpc 2.6.0 available. With this I compiled the compiler itself (no install). This went fine, so I expect the installation was OK. Then I tried to make the crosscompiler. This failed with the same error as before : make rtl_all FPC=/home/koenraad/devel/fpc-svn/compiler/ppcrossarm RELEASE=1 make[1]: Map '/home/koenraad/devel/fpc-svn' wordt binnengegaan make -C rtl all make[2]: Map '/home/koenraad/devel/fpc-svn/rtl' wordt binnengegaan make -C embedded all make[3]: Map '/home/koenraad/devel/fpc-svn/rtl/embedded' wordt binnengegaan /bin/mkdir -p /home/koenraad/devel/fpc-svn/rtl/units/arm-embedded /home/koenraad/devel/fpc-svn/compiler/ppcrossarm -Cparmv7m @rtl.cfg -Ur -Tembedded -Parm -XParm-none-eabi- -Xr -Ur -Xs -O2 -n -Fi../inc -Fi../arm -FD/home/koenraad/CodeSourcery/Sourcery_CodeBench_Lite_for_ARM_EABI/bin -FE. -FU/home/koenraad/devel/fpc-svn/rtl/units/arm-embedded -darm -dRELEASE -CfSoft -Us -Sg system.pp text.inc(1897,3) Fatal: Unknown compilerproc "fpc_ansistr_assign". Check if you use the correct run time library. Fatal: Compilation aborted make[3]: *** [system.ppu] Fout 1 make[3]: Map '/home/koenraad/devel/fpc-svn/rtl/embedded' wordt verlaten make[2]: *** [embedded_all] Fout 2 make[2]: Map '/home/koenraad/devel/fpc-svn/rtl' wordt verlaten make[1]: *** [rtl_all] Fout 2 make[1]: Map '/home/koenraad/devel/fpc-svn' wordt verlaten make: *** [base.build-stamp.arm-embedded] Fout 2 What am I doing wrong ? All suggestions to help resolve this are welcomed. Thanks, Koenraad Lelong. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Re: [fpc-pascal] fpc 2.7.1 for arm-embedded
Am Friday 10 February 2012 08:25:01 schrieb Koenraad Lelong: > I did another experiment. > I make a zip-file with a 2.7.1 compiler and its sources. I installled > this on a brand new virtual machine with OpenSuse, so no fpc 2.6.0 > available. With this I compiled the compiler itself (no install). This > went fine, so I expect the installation was OK. ... This means that there is a simple install solution for Linux? All in one directory? ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
