[fpc-pascal] fpc without short boolean evaluation

2008-10-23 Thread [EMAIL PROTECTED]

Hello,

it is possible, to switch off the short boolean evaluation?

Normally follow code is possible:
...
i:=0;
if (i=0) or (10/i  1) then
{do something};
...

For my academic studies I must switch off this short boolean evaluation,
because I need a pascal compiler with full boolean evaluation.  The
example code above must output a runtime error.

Best regards,
thomas polnik.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal


Re: [fpc-pascal] FreeBSD/x86_64 snapshots

2008-09-27 Thread [EMAIL PROTECTED]
/fpc/$fpcversion/units/$fpctarget
-Fu/usr/local/lib/fpc/$fpcversion/units/$fpctarget/*
-Fu/usr/local/lib/fpc/$fpcversion/units/$fpctarget/rtl
#-Fu~/fpc/packages/base/*/units/;~/fpc/fcl/units/;~/fpc/rtl/units/

# searchpath for libraries
-Fl/usr/local/lib



#-Fl/pp/lib
#-Fl/lib;/usr/lib


# -
# Linking
# -

# generate always debugging information for GDB (slows down the compiling
# process)
#  -gcgenerate checks for pointers
#  -gduse dbx
#  -gguse gsym
#  -ghuse heap trace unit (for memory leak debugging)
#  -gluse line info unit to show more info for backtraces
#  -gvgenerates programs tracable with valgrind
#  -gwgenerate dwarf debugging info
#
# Enable debuginfo and use the line info unit by default
#-gl

# always pass an option to the linker
#-k-s

# Always strip debuginfo from the executable
-Xs


# -
# Miscellaneous
# -

# Write always a nice FPC logo ;)
-l

# Verbosity
#  e : Show errors (default)   d : Show debug info
#  w : Show warnings   u : Show unit info
#  n : Show notes  t : Show tried/used files
#  h : Show hints  c : Show conditionals
#  i : Show general info   d : Show debug info
#  l : Show linenumbersr : Rhide/GCC compatibility mode
#  a : Show everything x : Executable info (Win32 only)
#  b : Write file names messages with full path
#  v : write fpcdebug.txt with p : Write tree.log with parse tree
#  lots of debugging info
#
# Display Info, Warnings and Notes
-viwn
# If you don't want so much verbosity use
#-vw

#
# That's all folks
#



Fabio Luis Girardi


2008/9/19 Francisco Reyes [EMAIL PROTECTED]

 [EMAIL PROTECTED] writes:

  I will test it!! I need it!


 Fabio,

 Basically all you need to do is:
 + Untar snapshot to your home directory
 + Create   ~/.fpc.cfg :
  -Fu~/snapshot/lib/fpc/$FPCVERSION/units/$FPCTARGET/*
  -viwh
 + Either symlink /snapshot/bin to ~/bin or cd ~/bin
 ln -s /snaphot/bin/*
 + Symlink the ppcx64 file too
 cd ~/bin
 ln -s /snapshot/lib/fpc/2.3.1/ppcx64 (from memory, check)


 I plan to test it some more this weekend too..

 ___
 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] FreeBSD/x86_64 snapshots

2008-09-19 Thread [EMAIL PROTECTED]
I will test it!! I need it!

Thanks!

Fabio Luis Girardi

2008/9/18 Francisco Reyes [EMAIL PROTECTED]

 Marco van de Voort writes:

  Well, this is the stuff the buildfaq reading was for :-)


 I printed it and read it on the train.. on the way home.


 I store a minimal configuration file in ~/.fpc.cfg :

 -Fu~/snapshot/lib/fpc/$FPCVERSION/units/$FPCTARGET/*
 -viwh


 Tried that.
 Tar examped off ~ so I have ~/snapshot.
 Symbolic link from ~/snapshot to ~/bin

 ~/.fpc.cfg has
 -Fu~/snapshot/lib/fpc/$FPCVERSION/units/$FPCTARGET/*
 -viwh

 When I try to run fpc I get:
 Error: ppcx64 can't be executed, error message: Failed to execute ppcx64,
 error code: 127

 I did a symbolic link for ppcx64 to be in ~/bin; that fixed the  problem.

 I see that in the i386 that is how it is solved too.
 A sym link in /usr/local/bin for /usr/local/lib/fpc/2.2.2/ppc386

 So far only compiled a few simple programs, but the snapshot seems to work.

 Do we want more testers? Or you want to do more work before doing a more
 widespread announcement.. Could post a note in FbsdAMD64 lettting people
 know of the snapshot.. for testing.

 Where/how do I get the regression tests? From SVN?


 ___
 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] TThread.WaitFor not returning?

2008-09-17 Thread [EMAIL PROTECTED]
Hi!

I have a similar problem when using threads with synchronize...  And I
understand that threads in FPC/Lazarus under Linux/BSD works like this:

When you call synchronize from inside of you thread, this sends a message to
application thread with the procedure that will be used to synchronize AND
WAIT FOR a response from application thread of the execution of sync
procedure. BUT when you call Thread.WaitFor in application thread, the
application don't process any messages because it is waiting the thread
finish, and thread don't finish because it is waiting a response of
application thread of the execution of sync procedure... and you have your
aplication freeze!

My solution in this case is override the WaitFor procedure...

procedure TMyThread.WaitFor;
begin
   while not ended do
  application.processmessages;
end;

...and var ended must be set to true in the last line of procedure
execute...


Fabio Luis Girardi

2008/9/16 Luca Olivetti [EMAIL PROTECTED]

 En/na Graeme Geldenhuys ha escrit:


 procedure TtiLogToCacheAbs.Terminate;
 begin
  writeln(' TtiLogToCacheAbs.Terminate');
  FThrdLog.Terminate;
  writeln('   called .Terminate() and now calling .WaitFor()');
  FThrdLog.WaitFor;
  writeln(' TtiLogToCacheAbs.Terminate');
 end;

 Any ideas?


 Do you call synchronize inside the thread?
 Anyway, I don't usually call WaitFor (I've had many problems with it), I
 set a flag in the thread and I loop sleeping (or calling checksynchronize if
 the thread uses synchronize) until it's true, eg:

 procedure TMyThread.execute;
 begin
  while not terminated do
  begin

  end;
  finished:=true;
 end;




 MyThread.Terminate;
 while not MyThread.Finished do sleep(100);

 or

 while not MyThread.Finished do CheckSynchronize(100);

 Bye
 --
 Luca


 ___
 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] FreeBSD FPC i386 to AMD64

2008-07-22 Thread [EMAIL PROTECTED]
No Graeme, you isn't wrong, 64 bit FPC is not ready yet for FreeBSD... :(

Thank you

2008/7/16 Graeme Geldenhuys [EMAIL PROTECTED]:
 On Wed, Jul 16, 2008 at 2:50 PM, [EMAIL PROTECTED]
 [EMAIL PROTECTED] wrote:
 Hi!

 What's the steps to build FreeBSD FPC AMD64 from FreeBSD FPC i386? Is
 impossible?

 I can do it using Linux FPC AMD64 compiler?


 I may be wrong, so others need to confirm this. But I think 64bit FPC
 is not supported on *BSD yet.


 Regards,
  - Graeme -


 ___
 fpGUI - a cross-platform Free Pascal GUI toolkit
 http://opensoft.homeip.net/fpgui/
 ___
 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] FreeBSD FPC i386 to AMD64

2008-07-16 Thread [EMAIL PROTECTED]
Hi!

What's the steps to build FreeBSD FPC AMD64 from FreeBSD FPC i386? Is
impossible?

I can do it using Linux FPC AMD64 compiler?


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


[fpc-pascal] Webservice from .Net

2008-07-08 Thread [EMAIL PROTECTED]
I build webservice app with .Net and connect to client app with fpc. I 
used wst unit. But i have problem with WSDL translate result using the 
Lazarus IDE. There is no parameter/function like wst samples. Can anyone 
help me? or give the tutorial step by step? Tq

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


[fpc-pascal] Date conversion question

2008-06-06 Thread [EMAIL PROTECTED]

Hello,
I have a little project in which I need to convert various string 
encoded in various date format to TDateTime.

For the same date, I'll have:

'2008-05-10 21:49:21'
'2008:05:10 21:49:21'
'2008-05-10T19:49:21Z'

I am no expert with date manipulation so I am asking:

For the first type of string;
DateSeparator:= '-';
ShortDateFormat:= ':MM:dd';
StrToDateTime(str_date); //gets converted.

For the second type of string;
ShortDateFormat:= ':MM:dd';
DateSeparator:= ':';
StrToDateTime(str_date); // will trigger an exception
Is that intented or normal? Is there a method available except replacing 
the ':' by '-' in the date part?


For the third type of string;
Should I convert the third string and remove the T and Z chars or are 
there any others methods available?


Thanks in advance.



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


Re: [fpc-pascal] Date conversion question

2008-06-06 Thread [EMAIL PROTECTED]



Search for scandatetime in

http://svn.freepascal.org/cgi-bin/viewvc.cgi/trunk/rtl/objpas/dateutil.inc?view=markup

Have a look at the documentation for formatdatetime and the comments in the
source to get an idea how to use it.

  

 ScanDateTime('?MM?dd?hh?nn?ss',str); // seems to work fine here.

Thanks.


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


Re: [fpc-pascal] FPC scripting suport

2008-05-28 Thread [EMAIL PROTECTED]
I'm using Pascal Script 3.0 in FPC...

Fabio

2008/5/28 Michael Van Canneyt [EMAIL PROTECTED]:


 On Wed, 28 May 2008,  wrote:

 I use JVInterpreter from JEDI with very good results in Delphi. It allows 
 you to write from simple
 functions to complete programs using procedural and object oriented 
 programming, also one can
 share objects between the application and the script.

 Does anyone ported it to FPC?

 It looks very abandoned to me ?

 Michael.
 ___
 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] Playing with SpVoice (ole object)

2008-05-12 Thread [EMAIL PROTECTED]

Joao Morais wrote:

  s := 'hello world';
  vsound.speak(s);


speaks using a literal but says randomic words (sometimes says nothing) 
using a variable. Is there something that I am missing?


You should use a variable of type WideString:
VAR
 S: WideString;

And all will be good
-
Best regards
Boriss

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


Re: [fpc-pascal] Read() for multiple variables.

2008-04-02 Thread [EMAIL PROTECTED]

zaher dirkey wrote:
how to use read() procedure to read multiple variable one of them is 
string type


To read a string and then number it is possible only if the length of a 
line is precisely known and fixed.
I read out one string, and then I find in it numbers. Here an example 
for a finding of real:

--
procedure FindReal(Source: String; VAR Destign: Real;
VAR NBeg, CodeOp: Integer);
 CONST
 BegOfNumb: SET OF CHAR = ['0'..'9'];
 NumbChars: SET OF CHAR = ['0'..'9','E','e','+','-','.'];

 VAR
Buf_String: String;
Buf_Real  : Real;
len   : Integer;
 BEGIN
CodeOp:=-30;
 len:=LENGTH(Source);
if (NBeg=0) then EXIT;
if NBeg=len then EXIT;
   Buf_String:='';
   While (NOT (Source[NBeg] in BegOfNumb))
AND (NBeg  len) do INC(NBeg);
if NBeg=len then EXIT;
if NBeg1 then
  if (Source[NBeg-1]='+') OR (Source[NBeg-1]='-') then 
DEC(NBeg,1);

While (Source[NBeg] in NumbChars) AND (NBeg=len) do
begin
Buf_String:=Buf_String + Source[NBeg]; INC(NBeg)
end;
Val(Buf_String, Buf_Real, CodeOp);
if CodeOp=0 then Destign:=Buf_Real
 END;
---
Boris

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


Re: [fpc-pascal] Lazarus + Qt4 in FreeBSD

2008-01-02 Thread [EMAIL PROTECTED]
Forwarding...


de
[EMAIL PROTECTED] [EMAIL PROTECTED]

para
[EMAIL PROTECTED]
data
29/12/2007 20:30
assunto
Lazarus + Qt4 in FreeBSD

Hi,
I've just readed thread on fpc-pascal list, and seen your sse2 problem
with qt4.
I had same thing on linux (Fedora Core 3) and qt4.
Just recompile your qt4 libs with --no-sse and you'll get bingo ;)

cheers,
zeljan



2007/12/21, Den Jean [EMAIL PROTECTED] :

 On Friday 21 December 2007 03:06:32 am [EMAIL PROTECTED] wrote:
  Den, you want screenshots? Then see...

 thanks

 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-21 Thread [EMAIL PROTECTED]
Hi!

I do some tests in my FreeBSD 6.1. In another FreeBSD 6.2 I build QT from
ports (that is an automated process, that applies some patchs before build).
In my FreeBSD 6.1 I build QT without ports (./configure, make, make install)
and I got the same result, but with a more detailed backtrace (because QT
compiled with debug enabled).

I have to change qt43.pas that uses defines LINUX and not UNIX...


Fabio Luis Girardi


2007/12/18, [EMAIL PROTECTED] [EMAIL PROTECTED]:

 6.2 Release disc 1 and 2...

 2007/12/18, Den Jean [EMAIL PROTECTED]:
 
  On Tuesday 18 December 2007 11:39:44 am Jonas Maebe wrote:
   It appears that you misunderstood the question: he asked *which*
   FreeBSD, not *why* FreeBSD.
 
  yes what should I download :-) ? 6.2, 6.3RC1 or 7.0BETA4
 
  ncftp ...FreeBSD/ISO-IMAGES-i386  ls 6.2
  6.2-RELEASE-i386-bootonly.iso  6.2-RELEASE-i386-docs.iso
  6.2-RELEASE-i386-disc1.iso CHECKSUM.MD5
  6.2-RELEASE-i386-disc2.iso  CHECKSUM.SHA256
  ncftp ...reeBSD/ISO-IMAGES-i386  ls 6.3
  6.3-RC1-i386-bootonly.iso  6.3-RC1-i386-disc2.iso
  CHECKSUM.MD5
  6.3-RC1-i386-disc1.iso 6.3-RC1-i386-docs.iso
  CHECKSUM.SHA256
  ncftp ...reeBSD/ISO-IMAGES-i386  ls 7.0
  7.0-BETA4-i386-bootonly.iso7.0-BETA4-i386-docs.iso
  CHECKSUM.SHA256
  7.0-BETA4-i386-disc1.iso   7.0-BETA4-i386-livefs.iso
  7.0-BETA4-i386-disc2.isoCHECKSUM.MD5
 
  ___
  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] Lazarus + Qt4 in FreeBSD

2007-12-21 Thread [EMAIL PROTECTED]
I don't remember if I'm running lazaurs with ./startlazarus or ./lazarus, I
will see if this ocurs with GTK2..

Yes, QT4 ports don't work, then I build QT4 manualy. My steps:


1) ./configure -prefix /usr/local/ -no-sse2 -no-glib
 do QT4 install in /usr/local and disable sse2 and GLib suport.

2) gmake, gmake install

3) cd lazaurs, gmake LCL_PLATFORM=qt OPT=-dUSE_QT_4_3
   I don't need specify where my QT4 librarys are installed because I put it
in /usr/local/(bin, lib, share...) in ./configure...

4) Run ./startlazarus, wait a little time and Have QT4 running with lazarus
under FreeBSD

2007/12/20, Den Jean [EMAIL PROTECTED]:

 On Wednesday 19 December 2007 11:37:33 am [EMAIL PROTECTED] wrote:
  I do some tests in my FreeBSD 6.1. In another FreeBSD 6.2 I build QT
 from
  ports (that is an automated process, that applies some patchs before
  build). In my FreeBSD 6.1 I build QT without ports (./configure, make,
 make
  install) and I got the same result, but with a more detailed backtrace
  (because QT compiled with debug enabled).

 I tried FreeBSD, but X always seg failed, so then I tried PC-BSD.

 The qt4 ports install include files to close to qt3 include files (you
 fall on qt3 files first). The PREFIX stuff does not work.
 The qt4-gui ports does not link with the PREFIX (does not find libqtcore,
 whatever you do with ldconfig)

 If you play with ldconfig, bash becomes unstable- you cannot launch
 any program or any new konsole anymore, the messages you get are common
 problems
 (google says: update ports recompile everything, but my ports are fresh
 :-) -
 reboot - I have never rebooted this much :-(.(BSD ? :-)

 with LD_LIBRARY_PATH and a manually (no ports) compiled qt4 (put in
 /usr/local/KDE4) I can finally compile lazarus
 (some pthreads link hurdle aside)

 lazarus compiled with:
 #!/bin/bash
 cd lazarus
 export LD_LIBRARY_PATH=/usr/local/KDE4/lib
 gmake LCL_PLATFORM=qt clean all OPT=-dDEBUG -dUSE_QT_4_3
 -k'-L/usr/local/KDE4/lib' -k'-lpthread'

 qt4intf compiled with:
 cat ./compile_lib.bash
 #!/bin/bash
 export QT4=/usr/local/KDE4
 export QT4I=$QT4/include
 export LD_LIBRARY_PATH=$QT4/lib
 if [ -e $LD_LIBRARY_PATH/libQtCore.so.4 ]
 then
 g++ -D UNIX -I. -I$QT4I -I$QT4I/Qt -I$QT4I/QtGui -I$QT4I/QtCore -Iqlcl
 qtpas.cpp -o libqt4intf.so -shared -fPIC -Xlinker $QT4/lib/libQtCore.so.4
 $QT4/lib/libQtGui.so.4 -soname=libqt4intf.so
 strip --strip-all libqt4intf.so
 else
 echo Please Modify location of Qt4 in this script
 fi


 lazarus runs, but has continuously exceptions:

 $2911D9EA
 $2911E1AA
 $291417EF
 $2881BAB8
 $082400DE TQTTHEMESERVICES__DRAWELEMENT, line 168 of qtthemes.pas
 $081BFF95 TCUSTOMSPEEDBUTTON__PAINTBACKGROUND, line 629
 of ./include/speedbutton.inc
 $081BF6B2 TCUSTOMSPEEDBUTTON__PAINT, line 518 of ./include/speedbutton.inc
 $0819B979 TGRAPHICCONTROL__WMPAINT, line 64
 of ./include/graphiccontrol.inc
 $08060F91
 $08191C92 TCONTROL__PERFORM, line 1016 of ./include/control.inc
 $0818710B TWINCONTROL__PAINTCONTROLS, line 4294
 of ./include/wincontrol.inc
 $08186E66 TWINCONTROL__PAINTHANDLER, line 4233 of ./include/wincontrol.inc
 QPainter::end: Painter ended with 2 saved states
 TApplication.HandleException Access violation
 Stack trace:
 $28E88EE

 I also noticed that the gtk2 version crashes when started with
 ./startlazarus but runs fine when started with ./lazarus ???

 so something is wrong ...
 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-19 Thread [EMAIL PROTECTED]
6.2 Release disc 1 and 2...

2007/12/18, Den Jean [EMAIL PROTECTED]:

 On Tuesday 18 December 2007 11:39:44 am Jonas Maebe wrote:
  It appears that you misunderstood the question: he asked *which*
  FreeBSD, not *why* FreeBSD.

 yes what should I download :-) ? 6.2, 6.3RC1 or 7.0BETA4

 ncftp ...FreeBSD/ISO-IMAGES-i386  ls 6.2
 6.2-RELEASE-i386-bootonly.iso  6.2-RELEASE-i386-docs.iso
 6.2-RELEASE-i386-disc1.iso CHECKSUM.MD5
 6.2-RELEASE-i386-disc2.iso CHECKSUM.SHA256
 ncftp ...reeBSD/ISO-IMAGES-i386  ls 6.3
 6.3-RC1-i386-bootonly.iso  6.3-RC1-i386-disc2.iso CHECKSUM.MD5
 6.3-RC1-i386-disc1.iso 6.3-RC1-i386-docs.iso
 CHECKSUM.SHA256
 ncftp ...reeBSD/ISO-IMAGES-i386  ls 7.0
 7.0-BETA4-i386-bootonly.iso7.0-BETA4-i386-docs.iso
 CHECKSUM.SHA256
 7.0-BETA4-i386-disc1.iso   7.0-BETA4-i386-livefs.iso
 7.0-BETA4-i386-disc2.iso   CHECKSUM.MD5

 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-19 Thread [EMAIL PROTECTED]
Debug detailed

2007/12/19, [EMAIL PROTECTED] [EMAIL PROTECTED]:

 Hi!

 I do some tests in my FreeBSD 6.1. In another FreeBSD 6.2 I build QT from
 ports (that is an automated process, that applies some patchs before build).
 In my FreeBSD 6.1 I build QT without ports (./configure, make, make
 install) and I got the same result, but with a more detailed backtrace
 (because QT compiled with debug enabled).

 I have to change qt43.pas that uses defines LINUX and not UNIX...


 Fabio Luis Girardi


 2007/12/18, [EMAIL PROTECTED] [EMAIL PROTECTED]:
 
  6.2 Release disc 1 and 2...
 
  2007/12/18, Den Jean [EMAIL PROTECTED]:
  
   On Tuesday 18 December 2007 11:39:44 am Jonas Maebe wrote:
It appears that you misunderstood the question: he asked *which*
FreeBSD, not *why* FreeBSD.
  
   yes what should I download :-) ? 6.2, 6.3RC1 or 7.0BETA4
  
   ncftp ...FreeBSD/ISO-IMAGES-i386  ls 6.2
   6.2-RELEASE-i386-bootonly.iso
   6.2-RELEASE-i386-docs.iso
   6.2-RELEASE-i386-disc1.iso CHECKSUM.MD5
   6.2-RELEASE-i386-disc2.iso  CHECKSUM.SHA256
   ncftp ...reeBSD/ISO-IMAGES-i386  ls 6.3
   6.3-RC1-i386-bootonly.iso  6.3-RC1-i386-disc2.iso
   CHECKSUM.MD5
   6.3-RC1-i386-disc1.iso 6.3-RC1-i386-docs.iso
   CHECKSUM.SHA256
   ncftp ...reeBSD/ISO-IMAGES-i386  ls 7.0
   7.0-BETA4-i386-bootonly.iso7.0-BETA4-i386-docs.iso
   CHECKSUM.SHA256
   7.0-BETA4-i386-disc1.iso   7.0-BETA4-i386-livefs.iso
   7.0-BETA4-i386-disc2.isoCHECKSUM.MD5
  
   ___
   fpc-pascal maillist  -   fpc-pascal@lists.freepascal.org
   http://lists.freepascal.org/mailman/listinfo/fpc-pascal
  
 
 

%gdb ./lazarus
GNU gdb 6.1.1 [FreeBSD]
Copyright 2004 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type show copying to see the conditions.
There is absolutely no warranty for GDB.  Type show warranty for details.
This GDB was configured as i386-marcel-freebsd...
(gdb) run
Starting program: /usr/home/fabio/lazarus0925/lazarus
warning: Unable to get location for thread creation breakpoint: generic error
[New LWP 100171]
[New Thread 0x891d000 (LWP 100163)]
TApplication.IconChanged - TODO: convert this message...no implementation in 
gtk or win32
[New Thread 0x891d200 (LWP 100155)]
Note: environment config file not found - using defaults

Program received signal SIGBUS, Bus error.
[Switching to Thread 0x891d000 (LWP 100095)]
qt_memfill32_sse2 (dest=0x89f8000, value=0, count=80) at emmintrin.h:607
607   __u.__a[3] = __Z;
Current language:  auto; currently c++
(gdb) backtrace
#0  qt_memfill32_sse2 (dest=0x89f8000, value=0, count=80) at emmintrin.h:607
#1  0x28de5ca1 in QImage::fill (this=0x20, pixel=0) at qdrawhelper_p.h:391
#2  0x28e06411 in QPixmap::fill (this=0xbfbf8a8c, [EMAIL PROTECTED]) at 
qdrawhelper_p.h:584
#3  0x29018ed5 in QCleanlooksStyle::drawPrimitive (this=0x894c640, 
elem=QStyle::PE_PanelButtonCommand, option=0xbfbf970c, painter=0xbfbfceac, 
widget=0x8a6e540) at styles/qcleanlooksstyle.cpp:1130
#4  0x28fb4f61 in QCommonStyle::drawControl (this=0x894c640, 
element=-1077948820, opt=0xbfbfce6c, p=0xbfbfceac, widget=0x8a6e540) at 
styles/qcommonstyle.cpp:770
#5  0x29034ec6 in QWindowsStyle::drawControl (this=0x894c640, 
ce=QStyle::CE_PushButtonBevel, opt=0xbfbfce6c, p=0xbfbfceac, widget=0x8a6e540) 
at styles/qwindowsstyle.cpp:2480
#6  0x2901ba02 in QCleanlooksStyle::drawControl (this=0x894c640, 
element=QStyle::CE_PushButtonBevel, option=0xbfbfce6c, painter=0xbfbfceac, 
widget=0x8a6e540) at styles/qcleanlooksstyle.cpp:2342
#7  0x28fb55d6 in QCommonStyle::drawControl (this=0x894c640, 
element=-1077948820, opt=0xbfbfce6c, p=0xbfbfceac, widget=0x8a6e540) at 
styles/qcommonstyle.cpp:745
#8  0x29034ec6 in QWindowsStyle::drawControl (this=0x894c640, 
ce=QStyle::CE_PushButton, opt=0xbfbfce6c, p=0xbfbfceac, widget=0x8a6e540) at 
styles/qwindowsstyle.cpp:2480
#9  0x2901ba02 in QCleanlooksStyle::drawControl (this=0x894c640, 
element=QStyle::CE_PushButton, option=0xbfbfce6c, painter=0xbfbfceac, 
widget=0x8a6e540) at styles/qcleanlooksstyle.cpp:2342
#10 0x290e6f11 in QPushButton::paintEvent (this=0x8a6e540) at qstylepainter.h:84
#11 0x28da0310 in QWidget::event (this=0x8a6e540, event=0xbfbfd52c) at 
kernel/qwidget.cpp:6212
#12 0x2904e110 in QAbstractButton::event (this=0x8a6e540, e=0xbfbfd52c) at 
widgets/qabstractbutton.cpp:1064
#13 0x290e6c94 in QPushButton::event (this=0x8a6e540, e=0xbfbfd52c) at 
widgets/qpushbutton.cpp:667
#14 0x28d59005 in QApplicationPrivate::notify_helper (this=0x8917200, 
receiver=0x8a6e540, e=0xbfbfd52c) at kernel/qapplication.cpp:3558
#15 0x28d591ec in QApplication::notify (this=0x89164f0, receiver=0x8a6e540, 
e=0xbfbfd52c) at kernel/qapplication.cpp:3499
#16 0x28b1973e in QCoreApplication::notifyInternal (this=0x89164f0, 
receiver=0x8a6e540, event=0xbfbfd52c) at kernel

Re: [fpc-pascal] Lazarus + Qt4 in FreeBSD

2007-12-18 Thread [EMAIL PROTECTED]
Well, FreeBSD is my personal choice. It´s stable and fast, more than Linux
or Windows (to me), because it has less drivers (and less bullshit, is a
joke :D)  than... And have the ports system...

I´m creating a project (http://pascalscada.blogspot.com in portuguese) to
allow create industrial applications using lazarus or delphi, prataform
independent (only on lazarus). I think that an application that ran in
FreeBSD, ran in Linux too, but an application that ran in Linux can´t run in
FreeBSD always. Because of this, it's my personal choice (to reduce tests
between similar OS).

Why QT? Because GTK and GTK2 disapoint in some aspects. Some components of
my project lost some properties under GTK (as Color property). Then Qt is my
next choice to test my project...

Ok, I will try an updated snapshot of lazarus. And yes, I'm using fpc 2.2.0.
I can't disable suport of SSE2 instructions on my QT4 instalation...


Fabio Luis Girardi


2007/12/17, Den Jean [EMAIL PROTECTED]:

 On Saturday 15 December 2007 02:25:59 pm [EMAIL PROTECTED] wrote:
   I will try disable SSE2 instructions...

 It was a long shot ...

 can you tell us which freebsd ? if I have time I may give it a try

 please try latest lazarus svn source again.
 (you are already using fpc 2.2.0 I see, Ok).




 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-18 Thread [EMAIL PROTECTED]
Sorry... I read why...

I'm using FreeBSD 6.2 (PC-BSD 1.4.1)... I will test on pure FreeBSD 6.2 on
my home.


Fabio Luis Girardi

2007/12/18, Jonas Maebe [EMAIL PROTECTED]:


 On 18 Dec 2007, at 11:22, [EMAIL PROTECTED] wrote:

  2007/12/17, Den Jean [EMAIL PROTECTED]:
 
  On Saturday 15 December 2007 02:25:59 pm [EMAIL PROTECTED]
  wrote:
   I will try disable SSE2 instructions...
 
  It was a long shot ...
 
  can you tell us which freebsd ? if I have time I may give it a try
 
  Well, FreeBSD is my personal choice.

 It appears that you misunderstood the question: he asked *which*
 FreeBSD, not *why* FreeBSD.


 Jonas
 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-16 Thread [EMAIL PROTECTED]
I will try disable SSE2 instructions...

2007/12/14, [EMAIL PROTECTED] [EMAIL PROTECTED]:

 Yes, I have an CPU SSE2 enabled (AMD Athlon 64 X2 3600+)


 I ran fpc test and the output is:

 %fpc teste1.pas
 Free Pascal Compiler version 2.2.0 [2007/09/02] for i386
 Copyright (c) 1993-2007 by Florian Klaempfl
 Target OS: FreeBSD/ELF for i386
 Compiling teste1.pas
 teste1.pas(10,2) Note: Local variable b not used
 Linking teste1
 41 lines compiled, 1.1 sec
 1 note(s) issued
 %./teste1
 executing sse2 instructions ...
 %


 Fabio Luis Girardi

 2007/12/12, Den Jean [EMAIL PROTECTED]:
 
  On Wednesday 12 December 2007 07:33:15 pm Den Jean wrote:
   do you have a sse2 capable processor ?
 
  compile and run pure pascal (no qt or lazarus) program below to check
  anyhow
  (more verbose version of testsse2 of
  svn/fpctrunk/tests/test/testsse2.pp)
 
  { %OPT=-OaVARMAX=16 -OaVARMIN=16 }
  { %CPU=i386 }
  uses
 mmx;
 
  { only a small test to see if it works in principle }
 
  var
b : byte;
q : array[0..15] of byte;
 
  begin
if is_sse2_cpu then
  begin
  writeln('executing sse2 instructions ...');
  asm
  {$ifdef FPC_PIC}
 call .LPIC
  .LPIC:
 popl %ecx
  {$ifdef darwin}
 movdqa%xmm1,%xmm2
 movdqa q-.LPIC(%ecx),%xmm4
 psubq %xmm1,%xmm2
 psubq q-.LPIC(%ecx),%xmm4
  {$else darwin}
 addl  $_GLOBAL_OFFSET_TABLE_,%ecx
 movdqa%xmm1,%xmm2
 movdqa[EMAIL PROTECTED](%ecx),%xmm4
 psubq %xmm1,%xmm2
 psubq [EMAIL PROTECTED](%ecx),%xmm4
  {$endif darwin}
  {$else FPC_PIC}
 movdqa%xmm1,%xmm2
 movdqaq,%xmm4
 psubq %xmm1,%xmm2
 psubq q,%xmm4
  {$endif FPC_PIC}
  end;
  end else writeln('not sse2 cpu');
  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] Lazarus + Qt4 in FreeBSD

2007-12-14 Thread [EMAIL PROTECTED]
Yes, I have an CPU SSE2 enabled (AMD Athlon 64 X2 3600+)


I ran fpc test and the output is:

%fpc teste1.pas
Free Pascal Compiler version 2.2.0 [2007/09/02] for i386
Copyright (c) 1993-2007 by Florian Klaempfl
Target OS: FreeBSD/ELF for i386
Compiling teste1.pas
teste1.pas(10,2) Note: Local variable b not used
Linking teste1
41 lines compiled, 1.1 sec
1 note(s) issued
%./teste1
executing sse2 instructions ...
%


Fabio Luis Girardi

2007/12/12, Den Jean [EMAIL PROTECTED]:

 On Wednesday 12 December 2007 07:33:15 pm Den Jean wrote:
  do you have a sse2 capable processor ?

 compile and run pure pascal (no qt or lazarus) program below to check
 anyhow
 (more verbose version of testsse2 of svn/fpctrunk/tests/test/testsse2.pp)

 { %OPT=-OaVARMAX=16 -OaVARMIN=16 }
 { %CPU=i386 }
 uses
mmx;

 { only a small test to see if it works in principle }

 var
   b : byte;
   q : array[0..15] of byte;

 begin
   if is_sse2_cpu then
 begin
 writeln('executing sse2 instructions ...');
 asm
 {$ifdef FPC_PIC}
call .LPIC
 .LPIC:
popl %ecx
 {$ifdef darwin}
movdqa%xmm1,%xmm2
movdqaq-.LPIC(%ecx),%xmm4
psubq %xmm1,%xmm2
psubq q-.LPIC(%ecx),%xmm4
 {$else darwin}
addl  $_GLOBAL_OFFSET_TABLE_,%ecx
movdqa%xmm1,%xmm2
movdqa[EMAIL PROTECTED](%ecx),%xmm4
psubq %xmm1,%xmm2
psubq [EMAIL PROTECTED](%ecx),%xmm4
 {$endif darwin}
 {$else FPC_PIC}
movdqa%xmm1,%xmm2
movdqaq,%xmm4
psubq %xmm1,%xmm2
psubq q,%xmm4
 {$endif FPC_PIC}
 end;
 end else writeln('not sse2 cpu');
 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] Lazarus + Qt4 in FreeBSD

2007-12-12 Thread [EMAIL PROTECTED]
I ran qt4 demos and all right! Lazarus demos crash...

Attached is the backtrace of lazarus and ldd of lazarus example (hello).

I will update my lazarus to a recent snapshot...


Fabio Luis Girardi


2007/12/11, Den Jean [EMAIL PROTECTED]:

 On Tuesday 11 December 2007 08:05:49 pm [EMAIL PROTECTED] wrote:
  Attached the script that build libqt4intf.so in FreeBSD (test)

 try to run the demoes of c++ qt4
 e.g.
 cd qt-x11-opensource-src-4.3.1/demos/textedit
 ./textedit


 try to build the demo of the fpc qt4 bindings and run those

 make sure you do not have 2 Qt's mixed in the library paths.
 Although different versions are claimed to be compatible, a
 different ./configure by distrib vendor may even make a same
 version a completely different Qt lib.

 There is a help about in the bindings mainwindow demo that gives the Qt
 version.

 use ldd to find the the path of the used lib on your system

 ldd ./mainwindow | grep -i qt
 libqt4intf.so = /usr/lib/libqt4intf.so (0xb7d3f000)
 libQtCore.so.4 = /usr/lib/qt4/lib/libQtCore.so.4 (0xb7a6f000)
 libQtGui.so.4 = /usr/lib/qt4/lib/libQtGui.so.4 (0xb72b2000)
 ___
 fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
 http://lists.freepascal.org/mailman/listinfo/fpc-pascal

%gdb ./lazarus
GNU gdb 6.1.1 [FreeBSD]
Copyright 2004 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type show copying to see the conditions.
There is absolutely no warranty for GDB.  Type show warranty for details.
This GDB was configured as i386-marcel-freebsd...
(gdb) run
Starting program: /usr/home/fabiolg/lazarus/lazarus
warning: Unable to get location for thread creation breakpoint: generic error
[New LWP 100086]
TApplication.IconChanged - TODO: convert this message...no implementation in 
gtk or win32
[New Thread 0x893 (LWP 100155)]
NOTE: codetools config file not found - using defaults

NOTE: FPC Source Directory not set! (see Environment Options)
[New Thread 0x8930200 (LWP 100137)]
TDefinePool.CreateFPCSrcTemplate FPCSrcDir does not exist: FPCSrcDir=

NOTE: Could not create Define Template for Free Pascal Sources
NOTE: help options config file not found - using defaults
TMainIDE.DoNewProject A
TMainIDE.DoNewEditorFile A NewFilename=
[TCustomFormEditor.CreateComponent] Class='TForm'
TMainIDE.DoNewEditorFile end unit1.pas

Program received signal SIGBUS, Bus error.
[Switching to Thread 0x893 (LWP 100128)]
$28cf59fa in qt_memfill32_sse2 () from /usr/local/lib/libQtGui.so.4
(gdb) backtrace
#0  $28cf59fa in qt_memfill32_sse2 () from /usr/local/lib/libQtGui.so.4
#1  $28d7abe2 in QImage::fill () from /usr/local/lib/libQtGui.so.4
#2  $28dc2561 in QPainterPrivate::draw_helper () from 
/usr/local/lib/libQtGui.so.4
#3  $28dc41f9 in QPainter::drawRects () from /usr/local/lib/libQtGui.so.4
#4  $28dc42b0 in QPainter::fillRect () from /usr/local/lib/libQtGui.so.4
#5  $28f4e6ec in qt_plastique_draw_gradient () from /usr/local/lib/libQtGui.so.4
#6  $28f4f56c in qt_plastique_drawShadedPanel () from 
/usr/local/lib/libQtGui.so.4
#7  $28f6e634 in QPlastiqueStyle::drawPrimitive () from 
/usr/local/lib/libQtGui.so.4
#8  $286afab8 in QStyle_drawPrimitive () from /usr/local/lib/libqt4intf.so
#9  $081cb4f0 in TQTTHEMESERVICES__DRAWELEMENT (DC=703139136, DETAILS={ELEMENT 
= TETOOLBAR, PART = 1, STATE = 1}, R=
{LEFT = 0, TOP = 0, RIGHT = 23, BOTTOM = 22, TOPLEFT = {X = 0, Y = 0}, 
BOTTOMRIGHT = {X = 23, Y = 22}}, CLIPRECT=$0, this=$295c05a0)
at qtthemes.pas:168
#10 $08172274 in TCUSTOMSPEEDBUTTON__PAINTBACKGROUND (PAINTRECT=
{LEFT = 0, TOP = 0, RIGHT = 23, BOTTOM = 22, TOPLEFT = {X = 0, Y = 0}, 
BOTTOMRIGHT = {X = 23, Y = 22}}, this=$29a74400)
at speedbutton.inc:614
#11 $08171c0c in TCUSTOMSPEEDBUTTON__PAINT (this=$29a74400) at 
speedbutton.inc:502
#12 $08158980 in TGRAPHICCONTROL__WMPAINT (MESSAGE={MSG = 1056, DC = 703139136, 
PAINTSTRUCT = $0, RESULT = 0}, this=$29a74400)
at graphiccontrol.inc:64
#13 $08060681 in SYSTEM_TOBJECT_$__DISPATCH$formal ()
#14 $081588ec in TGRAPHICCONTROL__DESTROY (vmt=$bfbfd410, this=$29a74400) at 
graphiccontrol.inc:46
#15 $0815183c in TCONTROL__PERFORM (MSG=1056, WPARAM=703139136, LPARAM=0, 
this=$29a74400) at control.inc:1015
#16 $08149cff in TWINCONTROL__PAINTCONTROLS (DC=703139136, FIRST=$0, 
this=$29790610) at wincontrol.inc:4259
#17 $08149acf in TWINCONTROL__PAINTHANDLER (THEMESSAGE={MSG = 1056, DC = 
703139136, PAINTSTRUCT = $29d5ccb0, RESULT = 0}, this=$29790610)
at wincontrol.inc:4198
#18 $0814ca1a in TWINCONTROL__WMPAINT (MSG={MSG = 1056, DC = 703139136, 
PAINTSTRUCT = $29d5ccb0, RESULT = 0}, this=$29790610)
at wincontrol.inc:5930
#19 $08158d23 in TCUSTOMCONTROL__WMPAINT (MESSAGE={MSG = 1056, DC = 703139136, 
PAINTSTRUCT = $29d5ccb0, RESULT = 0}, this=$29790610)
at customcontrol.inc:107
#20 $08060681 in SYSTEM_TOBJECT_

Re: [fpc-pascal] Lazarus + Qt4 in FreeBSD

2007-12-11 Thread [EMAIL PROTECTED]
Hi!!

I can build lazarus with Qt in FreeBSD, but when I ran ./startlazarus...
crash!

Attached the script that build libqt4intf.so in FreeBSD (test)

Fabio Luis Girardi


2007/12/7, Den Jean [EMAIL PROTECTED]:

 On Tuesday 04 December 2007 05:08:15 pm [EMAIL PROTECTED] wrote:
  If you ran ldd libqt4intf.so, what is the output?


 $ ldd -r libqt4intf.so
 linux-gate.so.1 =  (0xe000)
 libQtCore.so.4 = /usr/lib/qt4/lib/libQtCore.so.4 (0xb7be8000)
 libQtGui.so.4 = /usr/lib/qt4/lib/libQtGui.so.4 (0xb742b000)
 libstdc++.so.6 = /usr/lib/libstdc++.so.6 (0xb733d000)
 libm.so.6 = /lib/i686/libm.so.6 (0xb7318000)
 libgcc_s.so.1 = /lib/libgcc_s.so.1 (0xb730b000)
 libc.so.6 = /lib/i686/libc.so.6 (0xb71cb000)
 libz.so.1 = /lib/libz.so.1 (0xb71b8000)
 librt.so.1 = /lib/i686/librt.so.1 (0xb71af000)
 libpthread.so.0 = /lib/i686/libpthread.so.0 (0xb7198000)
 libdl.so.2 = /lib/libdl.so.2 (0xb7194000)
 libpng12.so.0 = /usr/lib/libpng12.so.0 (0xb716c000)
 libSM.so.6 = /usr/lib/libSM.so.6 (0xb7164000)
 libICE.so.6 = /usr/lib/libICE.so.6 (0xb714b000)
 libXi.so.6 = /usr/lib/libXi.so.6 (0xb7142000)
 libXrender.so.1 = /usr/lib/libXrender.so.1 (0xb7139000)
 libXrandr.so.2 = /usr/lib/libXrandr.so.2 (0xb7131000)
 libXfixes.so.3 = /usr/lib/libXfixes.so.3 (0xb712c000)
 libXcursor.so.1 = /usr/lib/libXcursor.so.1 (0xb7122000)
 libXinerama.so.1 = /usr/lib/libXinerama.so.1 (0xb711f000)
 libfreetype.so.6 = /usr/lib/libfreetype.so.6 (0xb70a4000)
 libfontconfig.so.1 = /usr/lib/libfontconfig.so.1 (0xb7075000)
 libXext.so.6 = /usr/lib/libXext.so.6 (0xb7066000)
 libX11.so.6 = /usr/lib/libX11.so.6 (0xb6f62000)
 /lib/ld-linux.so.2 (0x8000)
 libxml2.so.2 = /usr/lib/libxml2.so.2 (0xb6e2d000)
 libXau.so.6 = /usr/lib/libXau.so.6 (0xb6e2a000)
 libXdmcp.so.6 = /usr/lib/libXdmcp.so.6 (0xb6e24000)
 ___
 fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
 http://lists.freepascal.org/mailman/listinfo/fpc-pascal



compile_lib.sh
Description: Bourne shell script
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Lazarus + Qt4 in FreeBSD

2007-12-05 Thread [EMAIL PROTECTED]
I'm stupid!!!


In lcl/interfaces/qt/qt4.pas is wrote:

{$IFDEF MSWINDOWS}
QtIntf  = 'libqt4intf.dll';
{$ENDIF}
{$IFDEF LINUX}
QtIntf  = 'libqt4intf.so';
{$ENDIF}
{$IFDEF DARWIN}
QtIntf  = '';
{$ENDIF}


FREEBSD... not found!! :D

I sugest add this:

{$IFDEF FREEBSD}
QtIntf  = 'libqt4intf.so';
{$ENDIF}


Fabio Luis Girardi


2007/12/2, Den Jean [EMAIL PROTECTED]:

 On Saturday 01 December 2007 12:28:21 pm [EMAIL PROTECTED] wrote:
  6) Rebuild Lazarus without sucess... :(

 in point 5 you succesfully got a libqt4intf.so ?. Great.
 So the rest is just compiling lazarus.

 cd lazarus
 make LCL_PLATFORM=qt clean all OPT=dUSE_QT_4_3

 and look at output

 The option USE_QT_4_3 is if you use the Qt 4.3.1 libs.
 Do not add it if you used the Qt 4.2.3 libs.

 Did you put llibQtCore.so.4 and libQtGui.so.4 in /usr/local/lib as well ?
 and ran ldconfig or the bsd equivalent ?

 The resulting executable ofcourse depends on Qt :-)

 ldd ./lazarus | grep -i qt
 libqt4intf.so = /usr/lib/libqt4intf.so (0xb7d21000)
 libQtCore.so.4 = /usr/lib/qt4/lib/libQtCore.so.4 (0xb7a51000)
 libQtGui.so.4 = /usr/lib/qt4/lib/libQtGui.so.4 (0xb7294000)

 (/usr/lib on my system)


 regards,

 Den Jean
 ___
 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] Lazarus + Qt4 in FreeBSD

2007-12-02 Thread [EMAIL PROTECTED]
I'm interested, but I don't know the correct steps to do the libqt4intf... I
do:

1) Copy Qt4 sources to my home directory;

2) Build Qt4;

3) Copy the compile_lib.bash to compile_lib_fbsd.sh and change it to use my
Qt4 (in my home directory)

4) Run compile_libfbsd.sh

5) Put the libqt4intf.so in /usr/local/lib

6) Rebuild Lazarus without sucess... :(

How you do the libqt4intf.so in Linux?


Fabio Luis Girardi


2007/11/24, Den Jean [EMAIL PROTECTED]:

 On Thursday 22 November 2007 04:50:59 pm [EMAIL PROTECTED] wrote:
  Qt 4.3.1 is installed from ports and my Lazarus snapshot verion 0.9.25of
  22-nov-2007...

 probably because the linker does not find libqt4intf.so.
 I have so bsd experience. Are you interested in
 creating a libqt4intf.so for bsd :-). ?
 if so start from the linux source code and compile script.

 kind regards,

 Den Jean


 ___
 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] Re: Re: IPC/SHMGET and Multiple Variables (Marco van de Voort)

2007-11-29 Thread [EMAIL PROTECTED]


Thanks Marco. Works fine !


[EMAIL PROTECTED] wrote:

Send fpc-pascal mailing list submissions to
fpc-pascal@lists.freepascal.org

To subscribe or unsubscribe via the World Wide Web, visit
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
or, via email, send a message with subject or body 'help' to
[EMAIL PROTECTED]

You can reach the person managing the list at
[EMAIL PROTECTED]

When replying, please edit your Subject line so it is more specific
than Re: Contents of fpc-pascal digest...


Today's Topics:

   1.  Query (Bobby Walters)
   2. Re:  IPC/SHMGET and Multiple Variables (Marco van de Voort)
   3.  Delphi + FPC + HTTP + Magic = ? (L)
   4.  FCL-DB/SQLDB docs started (L)
   5. Re:  FCL-DB/SQLDB docs started (John)
   6. Re:  FCL-DB/SQLDB docs started (Graeme Geldenhuys)
   7.  fpc 2.2.1 mysql50 is broken on complex queries (Bee)
   8. Re:  FCL-DB/SQLDB docs started (Florian Klaempfl)
   9. Re:  fpc 2.2.1 mysql50 is broken on complex queries
  (Marco van de Voort)
  10. Re:  fpc 2.2.1 mysql50 is broken on complex queries (Bee)
  11. Re:  fpc 2.2.1 mysql50 is broken on complex queries
  (Marco van de Voort)
  12. Re:  fpc 2.2.1 mysql50 is broken on complex queries (Bee)


--

Message: 1
Date: Sun, 25 Nov 2007 07:10:27 -0800
From: Bobby Walters [EMAIL PROTECTED]
Subject: [fpc-pascal] Query
To: fpc-pascal@lists.freepascal.org
Message-ID:
[EMAIL PROTECTED]
Content-Type: text/plain; charset=ISO-8859-1

FPC List:

I am a Programmer of a few languages. I can't seem to think of much to
write. I'm wondering if others, could tell me what you have
written..to give me a few ideas..so I may write more osftware...and
learn to be a better developer?

  


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


[fpc-pascal] Lazarus + Qt4 in FreeBSD

2007-11-23 Thread [EMAIL PROTECTED]
Hi!

How to build lazarus with Qt4?? I set the interface of lazarus to Qt and try
rebuild only LCL, but when it is rebuilding, it stops because it don't found
qt4.pas.

I'm doing all steps of wiki
(http://wiki.lazarus.freepascal.org/Qt_Interface).http://wiki.lazarus.freepascal.org/Qt_Interface%29.
..

Qt 4.3.1 is installed from ports and my Lazarus snapshot verion 0.9.25 of
22-nov-2007...
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] serial ports under Unix using Freepascal

2007-10-06 Thread [EMAIL PROTECTED]
Yes, I'm studing the synaser objects...


Thank's :D

2007/10/4, josepascual [EMAIL PROTECTED]:

  Have you taken a look to synaser inside synapse packet software
 http://synapse.ararat.cz/?



 Jose Pascual



 p.d. bonito nombre papel higienico ;-)







 *De:* [EMAIL PROTECTED] [mailto:
 [EMAIL PROTECTED] *En nombre de *
 [EMAIL PROTECTED]
 *Enviado el:* miércoles, 03 de octubre de 2007 21:54
 *Para:* fpc-pascal@lists.freepascal.org
 *Asunto:* [fpc-pascal] serial ports under Unix using Freepascal



 Hi!

 I'm creating a component that handles serial port in windows/unix. Under
 Windows I include in uses the unit windows, that open, close, read, write,
 test if the configuration of serial port is valid (some set of
 configurations of baudrate, stop bits and parity is invalid in windows)  and
 if serial port exists.

 Under Unix I found the unit Serial, that open, close, read and write. How
 to test if serial port exist? Unix accept any set of configurations of  the
 serial port? I see fpopen that return the handle of serial port but I not
 found anything that describes error codes returned by this function in fpc
 rtl documentation.

 Somebody have tried to do this?

 info: I newbie in FPC Unix (FreeBSD).


 ___
 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] serial ports under Unix using Freepascal

2007-10-04 Thread [EMAIL PROTECTED]
Hi!

I'm creating a component that handles serial port in windows/unix. Under
Windows I include in uses the unit windows, that open, close, read, write,
test if the configuration of serial port is valid (some set of
configurations of baudrate, stop bits and parity is invalid in windows)  and
if serial port exists.

Under Unix I found the unit Serial, that open, close, read and write. How to
test if serial port exist? Unix accept any set of configurations of  the
serial port? I see fpopen that return the handle of serial port but I not
found anything that describes error codes returned by this function in fpc
rtl documentation.

Somebody have tried to do this?

info: I newbie in FPC Unix (FreeBSD).
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] Pascal is alive!!??

2007-02-20 Thread [EMAIL PROTECTED]
In the ACM-ICPC International Collegiate Programming Contest dropped 
pascal for this year final competitions and for next year, the students 
are not allowed to use pascal as their programming language. Did you 
know this? What is your idea? Also, in TopCoder site, you can not 
develop your programs with Pascal while as I know, Pascal has all the 
properties that C++ or JAVA have.


Any idea? Is there any technical problem with Pascal to be used in 
TopCoder's contest?




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


Re: [fpc-pascal] Pascal is alive!!??

2007-02-20 Thread [EMAIL PROTECTED]

What about Topcoder's and its Arena?

Daniël Mantione wrote:

Op Tue, 20 Feb 2007, schreef [EMAIL PROTECTED]:

  

In the ACM-ICPC International Collegiate Programming Contest dropped pascal
for this year final competitions and for next year, the students are not
allowed to use pascal as their programming language. Did you know this? What
is your idea? Also, in TopCoder site, you can not develop your programs with
Pascal while as I know, Pascal has all the properties that C++ or JAVA have.

Any idea? Is there any technical problem with Pascal to be used in TopCoder's
contest?



I saw this coming for a few years. Free Pascal has most definately been 
able to delay this for a few years, it was the de facto standard in 
competitions in recent years. But the trend was there. When I  
participated myself the amount of people using Pascal was in decline, 
usually in the end it were two teams of 50 or so who used Pascal.


Note that only the *requirement* to offer a Pascal environment has been 
scrapped, organisers of contests can still provide it if they want. So, 
please lobby at the contest organisation for a Pascal environment.


The only fix here is to strengthen our position in education. Most people 
today participate in Java, which is silly as it puts you in a clear 
disadvantage. I once submitted the first non-Java implementation of a 
problem after an hour into the contest. The reference implementation of 
the jury took 10 minutes and 60 MB of memory. My Pascal implementation 
gave the result instantly, while using 300 kilobytes of memory. The jury 
was totally blown away; after the contest we did investigate and it turned 
out that Pascal text I/O versus Java text I/O was 100% responsible for 
the difference.


In short, Pascal still rocks in contests. One thing is very important: 
a rock solid text mode IDE under both Windows and Linux. This makes a 
difference in a contest. FPC has never been able to live up to the Turbo 
Pascal level here. I'd say especially the IDE in Linux was only useable 
for people knowledged with FPC to work around the limitations.


Perhaps we should ask Tom Verhoeff, he is very involved in the icpc's.

Daniël



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


[fpc-pascal] asm an Freepascal under AMD 64

2006-03-21 Thread [EMAIL PROTECTED]

I'have some library which use some intel like asm code

type_32.pas(125,2) Error: Illegal assembler style specified INTEL
type_32.pas(146,13) Error: Unknown identifier EAX

So where do i' find  the new  gramatical word for use asm ?

As i read the doc it seem that there is no more support for asm for the 
 platform other the i386?


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


[fpc-pascal] Re: fpc-pascal Digest, Vol 14, Issue 8

2005-10-11 Thread [EMAIL PROTECTED]


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


[fpc-pascal] Cross compiler win32/ARM error code 2 ?

2005-09-02 Thread [EMAIL PROTECTED]

Hi,

just trying to build fpc (today snapshot  2.1.X) for win32 plateform and 
wince arm target.

i get the following error message ?

D:\FPC\2.1.x-srcmake all OPT=-vt CPU_TARGET=arm OS_TARGET=wince 
CROSSBINDIR=d:\
fpc\cross\arm-wince BINUTILSPREFIX=arm-wince- 
INSTALL_PREFIX=d:\FPC\2.1.X  d:\

FPC\build.log
makefile:172: *** The Makefile doesn't support target arm-wince, please 
run fpcm

ake first.  Stop.
make[3]: *** [rtlclean] Error 2
make[2]: *** [cycle] Error 2
make[1]: *** [compiler_cycle] Error 2
make: *** [build-stamp.arm-wince] Error 2

after that, i tried and fpcmake -w -Tall and then build again but same 
error message.

Any idea ?
Regards


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


Re: [fpc-pascal] Pointers

2005-07-27 Thread [EMAIL PROTECTED]
Maybe free pascal supports the absolute directive ;)

something like:

var
SomeAddress : pointer absolute $a000;

- Original Message - 
From: Daniel Franzini [EMAIL PROTECTED]
To: fpc-pascal@lists.freepascal.org
Sent: Thursday, July 28, 2005 1:55 AM
Subject: [fpc-pascal] Pointers


Hi everyone

I'm just trying to compile and execute a simple example from a
graphics programming tutorial under FPC. Here is the code

code

PROGRAM PixelExample;
{$MODE TP}  i used tp mode because i couldn't figure out how to
do inline asm in fpc mode

USES CRT;   { Include the KeyPressed function }
TYPE
  ScreenBufferType = ARRAY[0..63999] OF BYTE;
  ScreenBufferPtr = ^ScreenBufferType;

VAR
  Screen : ScreenBufferPtr;

PROCEDURE InitGraph; Assembler;
Asm
  mov ax, 0013h{ Function 0, mode 13h }
  int 10h
end;


PROCEDURE CloseGraph; Assembler;
Asm
  mov AX, 0003h  { Function 0, Mode 3}
  int 10h
end;

PROCEDURE SetPixel(X, Y : INTEGER; Color : BYTE);
VAR
  Address : WORD;
BEGIN
  Address := Y*320+X;
  Screen^[Address] := Color;
END;

BEGIN
  InitGraph;
Screen := MEM[$A000];   { Set up the screen buffer pointer }
---here is the error
  WHILE NOT KeyPressed DO
SetPixel(
   RANDOM(320), { Random X (Range 0-319) }
   RANDOM(200), { Random Y (Range 0-199) }
   RANDOM(256));{ Random Color (Range 0-255) }
  CloseGraph;
END.

/code

the fact is that i want Screen to point to an specific memory area
(0xA000) for writing to the display directly...but i can't figure out
how to make this

i've tried the following options

@Screen := $A000; - mode13h.pas(34,5) Error: Can't assign values to an
address
Screen := MEM[$A000]; - mode13h.pas(34,15) Error: Identifier not found
MEM

the last onde didn't worked and i think that's because of the win32
target...so i tried to change the target to go32v2 but there's no
system unit for this target

is there any way that i can compile and execute this simple and basic
example under win32, but without touching the video unit, just using
assembly??? (windows 2000, fpc 2.0.0)

-- 
Daniel

(...) one learns how to write code by reading code. One doesn't learn how
to
ride a bike by reading a book, either. (Theo de Raadt)

___
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] FP IDE

2005-04-18 Thread [EMAIL PROTECTED]
Yes! you only have to do fp from a terminal console.
Gaetano.
 The Windows version of FPC seems to have an IDE (fp.exe) of the
 traditional TP style.  Does this also exist for Linux versions?  After
 installing a Linux package, I can't find it anywhere.

 Angelo


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




Navighi a 4 MEGA e i primi 3 mesi sono GRATIS. 
Scegli Libero Adsl Flat senza limiti su http://www.libero.it



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


[fpc-pascal] Text GUI and Graphic GUI's, CLX etc.

2005-01-18 Thread [EMAIL PROTECTED]
Hi,

Borland/Delphi has a technology called CLX... it's ment for cross platform
development.

Another project called DWPL uses this CLX for Text Gui's and Graphical
Gui's.

It's pretty impressive.

One can use Delphi to design a graphical gui etc... and then thx to this
DWPL/CLX magic it can also be compiled/linked etc... and suddenly it's
turned into a Text GUI !!!.

I would like to develop a Text Based GUI application that can be cross
compiled to all targets.

So maybe this DWPL/CLX stuff can be compiled with Free Pascal 1.9.6 ?

I haven't tried it yet... but later I will... right now I have to go :D

Bye,
  Skybuck.


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


[fpc-pascal] No Project File ?

2005-01-18 Thread [EMAIL PROTECTED]
I also miss a project file in free pascal.

Many of my delphi programs whatever use all kinds of units.

I can't simply start adding all these to the unit directory or whatever in
free pascal's environment ?

So how does that work ?

Maybe I have to start creating fp.ini's for all my different projects and
somehow have the fp ide load them ?

Bye,
  Skybuck.


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


Re: [fpc-pascal] Cross-compilation to Linux from win32

2005-01-18 Thread [EMAIL PROTECTED]
I have changed this line:

 This configure program will make a new make file so that the binutils can
be
 compiled for linux

To this:

This configure program will make a new make file so that the binutils can be
compiled/linked for the host which is windows and use cygwin1.dll to work
but so that the binutils themselfes compile/link to the target which is
linux ;)

( I think that's what's going on :) )

Bye,
  Skybuck.



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


[fpc-pascal] uses unit in 'filepath\filename'; not supported ?

2005-01-18 Thread [EMAIL PROTECTED]
Hi,

Some of my delphi uses clauses look like this:

program FolderTest;

uses
 unittest in '..\unittest.pas';

begin
 writeln('Hello World');
readln;
end.

Free Pascal Win32 Dos Ide reports:

Fatal: Can't find unit unittest

Bye,
  Skybuck.

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


[fpc-pascal] Running a background process

2005-01-18 Thread [EMAIL PROTECTED]
Hi,

As I mentioned in my previous post I would like to develop a text based
application... possibly with a text based gui.

I have one little problem.

I would like the program to do stuff while it waits for user input. Let's
call do stuff the background process.

In a windows console program this would be really easy. I would simply use
writeln and readln etc to read commands etc and display stuff etc... and use
a second Tthread to do the background stuff.

But after I developed the text based application I want to build it to all
other targets...

For now dos, linux and windows will do... but later maybe also beos and
amiga... I was hoping that free pascal could also target C64 ! That would be
super cool =D

Anyway...

The problem is a little bit with readln and readkey etc...

Readln will simply block the process etc. Dos doesn't have multi threaded
support ???

I could do it as follows:

while running do
begin
if KeyPressed then
begin
ReadLn(Command);
end;

BackgroundProcess.SingleLoop; // ;) etc
end;

So far this seems the most easy and best solution

BUT

While the user is typing a command the whole program will freeze etc...

That's a bit unfortunate. I would like the background process singleloop to
continue while the user enters his commands etc...

Euhm any solutions ?

Well I have thought of one solution and that's the CLX thing... or Turbo
Vision thing... it's a text based gui... and if I am not mistaken it also
has some sort of Idle Loop etc...

That's why I mentioned CLX in my previous post.

Well maybe somebody in this mailing list found a nice trick for console
application in dos with background processess ? which is even target
independant or something ?

I have seen DWPL and it's stack use some sort of Multi Threading in Dos
etc... but I don't know if it's cross platform and stable etc.. probably not
;)

Bye,
  Skybuck.















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


[fpc-pascal] Re: uses unit in 'filepath\filename'; not supported ?

2005-01-18 Thread [EMAIL PROTECTED]
Ok this seems to work only in the program section of delphi program and not
in other units etc.

- Original Message - 
From: [EMAIL PROTECTED] [EMAIL PROTECTED]
To: free pascal mailing list fpc-pascal@lists.freepascal.org
Sent: Sunday, January 16, 2005 1:00 PM
Subject: uses unit in 'filepath\filename'; not supported ?


 Hi,

 Some of my delphi uses clauses look like this:

 program FolderTest;

 uses
  unittest in '..\unittest.pas';

 begin
  writeln('Hello World');
 readln;
 end.

 Free Pascal Win32 Dos Ide reports:

 Fatal: Can't find unit unittest

 Bye,
   Skybuck.


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


[fpc-pascal] Free Pascal, Dos, Cross compiling, Etc

2005-01-18 Thread [EMAIL PROTECTED]
Hi,

I just downloaded Free Pascal 1.9.6 for Win32.  (fpc-1.9.6.i386-win32.zip)

Unzipped it, Installed it and added the thing to the end of the path etc.

I would like to compile a simple Hello World program to all targets.

Apperently I can only compile/link/build to the win32 target :( !

I would like to compile the hello world example so that it can be run from
ms-dos 6.22 as well.

Sigh.

Since I now have a BIG harddisk 120 Gigabytes ;) I would simply like to
download a free pascal cross compiler binary/zip/distribution which has
everything needed to compile to ALL TARGETS !

Does such a distribution of free pascal already exist ?

Or do I now have to start building my own free pascal cross compiler for
every target ?!?

Bye,
  Skybuck.


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


[fpc-pascal] Re: No Project File ?

2005-01-18 Thread [EMAIL PROTECTED]
Ups, Spoke to soon.

It seems the unit directory entries are not stored in fp.ini ?

Oh well I give and go play a game ;)

Question:

How can I tell free pascal to find some units somewhere without having to
make it part of the environment ?

Bye,
  Skybuck.

- Original Message - 
From: [EMAIL PROTECTED] [EMAIL PROTECTED]
To: free pascal mailing list fpc-pascal@lists.freepascal.org
Sent: Sunday, January 16, 2005 1:12 PM
Subject: Re: No Project File ?


 Yes I think this will work thx to Options-Save As and Option-Open menu
;)


 - Original Message - 
 From: [EMAIL PROTECTED] [EMAIL PROTECTED]
 To: free pascal mailing list fpc-pascal@lists.freepascal.org
 Sent: Sunday, January 16, 2005 1:08 PM
 Subject: No Project File ?


  I also miss a project file in free pascal.
 
  Many of my delphi programs whatever use all kinds of units.
 
  I can't simply start adding all these to the unit directory or whatever
in
  free pascal's environment ?
 
  So how does that work ?
 
  Maybe I have to start creating fp.ini's for all my different projects
and
  somehow have the fp ide load them ?
 
  Bye,
Skybuck.
 



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


Re: [fpc-pascal] Cross-compilation to Linux from win32

2005-01-18 Thread [EMAIL PROTECTED]
- Original Message - 
From: Simon Kissel [EMAIL PROTECTED]
To: fpc-pascal@lists.freepascal.org
Sent: Friday, January 14, 2005 7:55 PM
Subject: [fpc-pascal] Cross-compilation to Linux from win32


 Hi,

 after quite some time I thought to give FPC another try to see if it's
 a suitable replacement for Kylix.

 My goal is to be able to cross-compile Linux elf targets from win32.

 So I downloaded and installed 1.9.6, and after that added the units
 packages for Linux.

 Run up FP, compiled hello world, worked. Switched the target in FP to
 linux, compiled again - and wow, it also worked. Using the verbose
 output I could even see it using the Linux units etc. All fine.

 Until I examined the generated executable hello. It looks like it's
 a Linux binary packed into a PE file. Very weird. Doesn't run under
 Linux of course, and does nothing under Windows.

 Next attempt was to use fpc directly:

 C:\pp\demo\textfpc -Aelf hello.pp
 Free Pascal Compiler version 1.9.6 [2004/12/31] for i386
 Copyright (c) 1993-2004 by Florian Klaempfl
 Target OS: Win32 for i386
 Compiling hello.pp
 Linking hello.exe
 31 Lines compiled, 0.4 sec

 Well, no.

 Some advise on what to do would be very welcome.

 Thanks,

 Simon


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

Hi,

A cross compiler works on a specific operating system (the host) and
compiles/links code for another processor/operating system (the target)

I think one needs the following things to build a free pascal
cross-compiler:

1. A cross compiler which can be executed/run on the host computer and
compiles to the target computer. (as.exe will be the cross compiler )

2. A cross linker which can be executed/run on the host computer and links
to the target computer.
( ls.exe will be the cross linker )

3. Free Pascal Compiled Units for the target computer.
( c:/pp/units/linux )

( I don't know how to compile these units for the target computer, I
downloaded them from somebody else )

Here are some steps/tips to help you ;)

I build a free pascal cross compiler once.

It compiles from win32 to linux.

Here some tips:

1. Install Free Pascal ( Binary )

2. Install CygWin ( Binary ) Download all developer things.

3. Install BinUtils-2.14 (or maybe another version) ( Source )

4. Find somebody with compiled free pascal linux units. Place them in
c:/pp/units/linux

5. Go in CygWin

6. Type: which make

7. Check if it's cygwin's make. If it's the wrong version than alter
cygwin.bat and change the path so that only windows folders and this path is
in it: c:\cygwin\bin

8. Go to the binutils folder

To list folders and files type: ls

To go to root type: cd c:/

To go to binutils type: cd /binutils-2.14

Make a new build folder by typing: mkdir build

Type: cd build

Type: ../configure --target=i686-linux

This means it executes the program in the parent folder and places the
output in the current folder which should be c:/binutils-2.14/build

This configure program will make a new make file so that the binutils can be
compiled for linux

BinUtils contains a as.exe  ( cross assembler ) and a ld.exe ( cross
linker ) you need these two for the cross compiler.

9. Disable firewalls and virus scanners, plug the network cables.

10. Type: make

It will take very long to make the new as-new.exe and ld-new.exe

11. After it's done you have two new files:

as-new.exe is located in build\as\

ld-new.exe is located in build\ld\

12.

Execute as-new.exe with the parameter -v

This parameter will show you if the target is indeed linux.

If you get errors will doing this you are using the wrong cygwin1.dll. There
could be multiple copies of
cygwin1.dll on your system.

The solution is to copy the cygwin1.dll file from c:\cygwin\bin to the
as-new folder.

13. Copy as-new.exe to c:\pp\bin\linux and rename it to as.exe
14. Copy ld-new.exe to c:\pp\bin\linux and rename it to ld.exe

15. Change the windows path variable so that c:\cygwin\bin is removed from
it.

If you don't do this then free pascal cross compiler might use the wrong
as.exe and ld.exe.

16. Make a simply hello world example and compile it like this:

fpc -TLINUX hello.pas

The result will be a linux executable without an extension.

Go to linux and type:

./hello

To run it.

If you uploaded it to a linux machine via ftp or something and you are using
ssh/putty whatever you might first need to give it execute permissions etc.

Good luck to you.
   Bye,
Skybuck.


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


[fpc-pascal] Re: No Project File ?

2005-01-18 Thread [EMAIL PROTECTED]
Yes I think this will work thx to Options-Save As and Option-Open menu ;)


- Original Message - 
From: [EMAIL PROTECTED] [EMAIL PROTECTED]
To: free pascal mailing list fpc-pascal@lists.freepascal.org
Sent: Sunday, January 16, 2005 1:08 PM
Subject: No Project File ?


 I also miss a project file in free pascal.

 Many of my delphi programs whatever use all kinds of units.

 I can't simply start adding all these to the unit directory or whatever in
 free pascal's environment ?

 So how does that work ?

 Maybe I have to start creating fp.ini's for all my different projects and
 somehow have the fp ide load them ?

 Bye,
   Skybuck.



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


[fpc-pascal] Delphi To Free Pascal

2005-01-12 Thread [EMAIL PROTECTED]
Hi,

This my test to see if free pascal can be used to compile Delphi Projects.

I have thousands of delphi projects/project files etc... but for this test I
simply create a new application and save it to c:\freepascal testen\hello
world\version 0.01

I notice how free pascal does not support delphi projects ?

I still open and after running it, free pascal ide says:

project1.dpr(4,8) Fatal: Can't find unit FORMS

This is the source:

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

So much for that.

Now I try to compile a delphi console project.

I again create a new project in delphi and save it as hello console ;)

This time it went as follows:

Euhm maybe this is because I used my free pascal cross compiler which
compiles from
windows to linux I made that once lol... but still I started the win32
fp ?

Oh well

Here is how it went (still not good ;)):

 Free Pascal IDE  Version 0.9.2
Using C:\pp2\bin\win32\cygwin1.dll version 1003.22.0.0
program started
press enter to continue

program finished
CallSignal called
Exception_Continue_Execution  set

Here is the source:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

begin
  { TODO -oUser -cConsole Main : Insert code here }
  writeln('program started');

  writeln('press enter to continue');
  readln;

  writeln('program finished');
end.

Free Pascal does not seem like an alternative to delphi at first sight.

Free Pascal claims compatiblity with delphi... but I am not seeing it from
these very simple quick tests.

I have very little time to spent on free pascal etc... so if I do give free
pascal a chance I would like it to have a couple of euhm things:

1. Delphi Project File support.

2. Open Delphi Project File, Press Compile, Press Run and voila ;)

Free Pascal should simply make it happen just like that ;)

I have all delphi source code... like classess.pas and the vcl source... so
maybe an installer
can be made for free pascal so that it can find the delphi source code.

Bye,
  Skybuck.


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


Re:[fpc-pascal] FPC 1.9.6 (a.k.a. 2.0.0-RC1) is out

2005-01-03 Thread [EMAIL PROTECTED]
Un grazie italiano al Free Pascal Team!

-- Initial Header ---

From  : [EMAIL PROTECTED]
To  :
fpc-pascal@lists.freepascal.org,fpc-devel@lists.freepascal.org,fpc-announce@lists.freepascal.org
Cc  :
Date  : Sun, 2 Jan 2005 16:16:45 +0100 (CET)
Subject : [fpc-pascal] FPC 1.9.6 (a.k.a. 2.0.0-RC1) is out


 Hello,

 The Free Pascal Team is pleased to announce that FPC version 1.9.6
 (or 2.0.0-RC1) is available and ready for download.

 This is a pre-release of version 2.0. As such, it is considered a beta of
 the upcoming 2.0 release, which is expected to be released in one or two
 months from here.

 While this is officially a beta, we believe that this version is release
 quality. We would very much like you download and install this version, and
 give any feedback regarding bugs and other issues.

 If no major bugs are found, version 2.0 will be released in a short
 timeframe.

 Highlights in this version:

 Compiler:
   + New platforms:
 - Linux: x86_64, amd64, sparc, PowerPC architectures.
 - Mac OS and Mac OS X (Darwin).
 - Netware Libc.
 - MorphOS.
   + Code generation improvements:
  Register variable support (-Or) for all targets, better inlining support.
   + MacPas compiler mode (-Mmacpas).

 RTL/FCL/FV:
   + New heap manager that releases memory back to the OS.
   + TThread.Synchronize support.
   + Further additions for improved Delphi compatibility.
   + Many other additions (RTTIUtils, new Datasets, FPCUnit test framework).
   * Free Vision Updated to fvision implementation, first official release.

 IDE:
   * Lots of improvements and stability fixes.
   * Support latest gdb 6.2.x and 6.3.x releases.

 Docs:
   + Lots of updates.
   + Easier to navigate html documentation.
   * fpDoc is used to generate all unit documentation.

 And of course many many bugfixes.

 A complete list of changes can be found in the whatsnew.txt file in the
 distribution.

 Downloads are available from the website for the following platforms:
 - Darwin (Mac OS X)
 - Dos (Go32V2)
 - FreeBSD
 - Linux (I386/Sparc/PPC/x86_64 (amd64))
 - Mac OS
 - Netware (clib and libc)
 - OS/2 (native)
 - Win32

 To download, go to
   http://www.freepascal.org/sdown.html
 and select a mirror near you. Look in the section 'official beta releases'
 and select the platform of your choice; then follow the download
 instructions.

 If you choose the SourceForge mirror, the download instructions are
 different. Also note that sourceforge mirrors are not immediatly up-to-date.

 Enjoy it, and a Happy New Year from

   The Free Pascal team.

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




Libero ADSL: 3 mesi gratis e navighi a 1.2 Mega. E poi hai l'Adsl senza limiti 
a meno di 1 euro al giorno. 
Abbonati subito senza costi di attivazione su http://www.libero.it




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


Re: [fpc-pascal]Apple Mac pointer problem

2004-09-26 Thread [EMAIL PROTECTED]

- Original Message - 
From: Olle Raab [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Friday, September 24, 2004 3:57 PM
Subject: Re: [fpc-pascal]Apple Mac pointer problem


04-09-24 09.44, skrev Stephen Downs följande:


 Thanks for everyones input (Harold - it a Mac thing !!). I'm away for a
couple
 of days now so won't be able to follow up until next week but I guess I
need
 to read up on alignment of binary data.

 I assume from what you are saying is that Ptr(testDataHdl^) is the right
way
 to do it in FreePascal but I need to check on how the data is read into
the
 structure.

If the problem is the alignment, you can try to read element by element.

What about using the 'packed' directive ?

testData = record
   testIndex :  packed array [0..12] of integer;
end;

Wouldn't that solve any alignment problems ?

Or doesn't free pascal have a 'packed' directive ?

Or is it a realy strange mac problem ? :)

Bye,
  Skybuck

( Gjez... outlook still uses the wrong default mail account... weird...
maybe it s because the mailing list uses my other mail account to sent mail
to... )


___
fpc-pascal maillist  -  [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal