Re: [fpc-pascal] "Hello world" syscalls

[Vincent Snijders via fpc-pascal]

Op do 9 jan. 2020 om 00:47 schreef Graeme Geldenhuys <
mailingli...@geldenhuys.co.uk>:

> On 07/01/2020 1:28 am, Vojtěch Čihák via fpc-pascal wrote:
> > I found this article: https://drewdevault.com/2020/01/04/Slow.html
> > but FPC is missing, so I wrote simple:
>
> On a side note, and for comparison... According to that website, he/she
> tested Java and got the following:
>
> Lang   Exec time   Total syscalls  Unique syscalls Size (KiB)
> Java   0.07s real   22626  15743KiB
>
> So the resulting Java.class is 16 MByte in size!!! How?
>
> I did the same on my system here with the latest OpenJDK 8 & 11.0.5. The
> resulting size of the class file was identical with Java 8 & 11 and was
> as follows:
>
> $ javac Test.java
>
> $ ls -l Test*
> -rw-rw-r-- 1 graemeg graemeg 413 Jan  8 22:54 Test.class
> -rw-rw-r-- 1 graemeg graemeg 115 Jan  8 22:53 Test.java
>
>
> My resulting class file is only 413 bytes. So how does that website
> owner get 16 MByte?
>
>
Did you create a static program? Otherwise you must include the dynamic
libraries it uses.

Vincent
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] try..finally vs interfaces performance

[Vincent Snijders]

2016-04-14 10:50 GMT+02:00 Michael Van Canneyt :

>
>
> On Thu, 14 Apr 2016, Mazola Winstrol wrote:
>
> Recently i did some maintenance in a code of a colleague. I realized that
>> he designed several classes with interface support so he do not need to
>> protect the code blocks with try..finally to ensure that the instances are
>> released from memory.
>>
>> Theoretically, which solution has higher performance? The traditional
>> approach (code protected try..finally) or classes with interfaces (no need
>> to protect the code. by otherside, classes with interfaces support have
>> lock operations)?
>>
>>
> It should be exactly the same. As soon as interfaces are used the compiler
> inserts an implicit try...finally in a procedure.
> You can see this if you step through the code with GDB, the execution point
> will jump to the end of the procedure and then back to the beginning...
>
>
I would venture, that manually adding try finally would give you better
performance than using interfaces at the cost of writing more code and
therefore less clear and more error-prone source.

If you use interfaces, the compiler also adds reference counting, which you
don't have if you free the objects at the right places.

It is not sure if you can measure the difference in performance though.

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

Re: [fpc-pascal] Wiki etc.- where?

[Vincent Snijders]

2016-02-25 12:39 GMT+01:00 Mark Morgan Lloyd <
markmll.fpc-pas...@telemetry.co.uk>:

> http://www.freepascal.org/ points to http://wiki.freepascal.org/ for the
> wiki, which is giving me a permanent 403 "Forbidden".
>
> Anybody know what's going on?
>

I don't get such error. Last week a mediawiki upgrade has taken place,
maybe a complete refresh of the page is necessary?

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

Re: [fpc-pascal] FPC Unicode / CodePage aware strings

[Vincent Snijders]

2015-12-10 11:18 GMT+01:00 Graeme Geldenhuys 
:

> On 2015-12-10 09:50, Jonas Maebe wrote:
> >
> > Graeme Geldenhuys wrote on Thu, 10 Dec 2015:
>
> Tried to compile that with FPC (yes, I included the new "Character" unit
> in uses clause) and I get a couple of compiler errors. I tried first
> with mode OBJFPC and then with mode DELPHI. Same compiler errors.
>

And mode DelphiUnicode?

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

Re: [fpc-pascal] [fpc-other] FPC Pestering Peacock (3.0.0) release

[Vincent Snijders]

2015-11-26 22:44 GMT+01:00 Jonas Maebe :

> On 26/11/15 22:39, Florian Klämpfl wrote:
>
>> Am 26.11.2015 um 22:31 schrieb Jonas Maebe:
>>
>>> It just got posted on Slashdot too:
>>>
>>> http://developers.slashdot.org/story/15/11/26/1544243/free-pascal-compiler-300-is-out-adds-support-for-16-bit-ms-dos-64-bit-ios
>>> :) (it should appear on the front page soon)
>>>
>>
>> Nice work :)
>>
>> But people should be now update their svn or download 3.0.0 before the
>> servers get slashdotted :)
>>
>
> I mainly hope the wiki will survive :) Is there a way to temporarily put
> mediawiki in a static/read-only mode if necessary?
>

The wiki can be put in read-only mode by changing the $wgReadOnly variable
in the LocalSettings.php file. Anonymous users get a static file from the
cache, so no database trip is necessary for them.

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

Re: [fpc-pascal] FPC fails to build rev 31874

[Vincent Snijders]

2015-09-28 11:08 GMT+02:00 Anthony Walter :

> FPC revision 31874 is failing to build with the following error:
>
> pexpr.pas(3990,48) Error: Incompatible type for arg no. 1: Got "tnode",
> expected "tsym"
>
> Last Changed Author: nickysn
> Last Changed Date: 2015-09-27 20:17:53 -0400 (Sun, 27 Sep 2015)
>
> See also:
http://bugs.freepascal.org/view.php?id=28738

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

Re: [fpc-pascal] Compiler error passing a Property as a parameter

[Vincent Snijders]

2014-06-08 21:50 GMT+02:00 Graeme Geldenhuys mailingli...@geldenhuys.co.uk
:

 Hi,

 I think it was FPC 2.6.0 that changed the language rules about
 Properties. You can't pass them directly as a var parameter, can't
 assign to a property of a property etc.

 Anyway, somebody recently asked my why this was implemented, and I can't
 actually remember the exact rational behind the FPC team's decision.

 Does anybody have a link to the documentation or FPC discussion on this?
 I'm looking for info on what was so bad about the old behaviour etc. and
 if this was another Delphi compatibility change or not?


See reason:
http://wiki.freepascal.org/User_Changes_2.4.0#Treating_direct-mapped_properties_as_regular_fields

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

Re: [fpc-pascal] Typinfo incompatibilities between FPC and Delphi

[Vincent Snijders]

2014-05-31 11:48 GMT+02:00 Sven Barth pascaldra...@googlemail.com:

 On 31.05.2014 05:53, Kenneth Cochran wrote:

 I'm attempting to port GExperts from Delphi to Lazaurus and noticed the
 definition of TPropInfo differs from Delphi's.

 In FPC's TPropInfo the PropType field is PTypeInfo whereas in Delphi it
 is PPTypeInfo. I'm not sure what is actually gained by this extra level
 of indirection but it exists none the less.

 Are there any plans to update TPropInfo to be compatible with Delphi or
 do I need to  wrap dependent code with compiler conditionals?


 There are no plans as we have to stay compatible with our own old
 codebases as well. You'll need to use compiler conditionals.


I think it is possible to write code without $ifdef (valid for Delphi and
FPC) if you use the typeinfo unit to extract the information.
http://www.freepascal.org/docs-html/rtl/typinfo/

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

Re: [fpc-pascal] Announcing PUMA Repository

[Vincent Snijders]

2013/12/13 Johannes W. Dietrich j.w.dietr...@medizinische-kybernetik.de

 Sorry, I cannot understand your message. Which software do I need to
 decode it?



I have no idea what went wrong.

I meant to say:
Maybe you can add it to the wiki too in this place:
http://wiki.lazarus.freepascal.org/Components_and_Code_examples#Packages.2FPrograms_for_FPC.2FLazarus_.28not_hosted_here.29

With kind regards,
Vincent
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Announcing PUMA Repository

[Vincent Snijders]

2013/12/13 Johannes W. Dietrich j.w.dietr...@medizinische-kybernetik.de

  With immediate effect the PUMA Repository (Pascal Units for Medical
 Applications) is available from SourceForge and berlios. The PUMA
 Repository is a collection of Pascal units for medical informatics. It is
 compatible with and was developed for Lazarus and Free Pascal, the units
 are partly also compatible with other Pascal dialects including Delphi and
 winsoft Pocket Studio.

 Currently, PUMA delivers two packages:

 The Unit Converter is a Pascal unit that provides functions for parsing
 quantitative instrumentation readings consisting of measurement values and
 units, as they are required e.g. in clinical chemistry. It also supports
 conversion of measurements from one unit to another one, e.g. to deliver
 results of laboratory investigations in different physical formats.

 The HL7 Engine is a collection of Pascal units that provide functions for
 parsing and compiling HL7 messages. Additionally, it supports reading and
 writing messages as files or streams. HL7 is a global standard for
 exchange, integration, sharing, and retrieval of electronic health
 information. It is increasingly used in hospital information systems and
 public health administration.

 Both packages come with test cases for FPC Unit. The HL7 engine also
 contains a demo application in form of a fully functional HL7 message
 browser.

 Reusable sourcecode and documentation are available from
 http://sourceforge.net/projects/puma-repository/ or
 http://developer.berlios.de/projects/puma-repository/.


You could add it to this list too:
http://wiki.freepascal.org/Components_and_Code_examples#Packages.2FPrograms_for_FPC.2FLazarus_.28not_hosted_here.29

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

Re: [fpc-pascal] CompareMem documentation

[Vincent Snijders]

2013/11/14 Juha Manninen juha.mannine...@gmail.com

 Documentation here:
   http://lazarus-ccr.sourceforge.net/docs/rtl/sysutils/comparemem.html

 says that the function returns 0, 0 or 0
 while actually it returns a Boolean.


Those docs are outdated: see up to date docs at:
http://www.freepascal.org/docs-html/rtl/sysutils/comparemem.html

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

Re: [fpc-pascal] math round vs banker's round

[Vincent Snijders]

2013/8/14 Sven Barth pascaldra...@googlemail.com

 I wanted to write x.5 instead of 0.5 :)



For any digit x, it still can be represented exactly in binary
representation ...

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

Re: [fpc-pascal] Trunk seems to break again!?!?

[Vincent Snijders]

2013/5/27 Reinier Olislagers reinierolislag...@gmail.com

 On Linux x64 with a clean fpc directory, using fpcup:
 svn info:
 ...
 Last Changed Author: joost
 Last Changed Rev: 24622
 Last Changed Date: 2013-05-26 22:51:41 +0200 (Sun, 26 May 2013)

 ...
 make -C linux all
 make[4]: Entering directory `/home/pascaldev/trunk/fpc/rtl/linux'
 make[4]: Leaving directory `/home/pascaldev/trunk/fpc/rtl/linux'
 /home/pascaldev/trunk/fpc/utils/fpcm/fpcmake -p -Tx86_64-linux Makefile.fpc
 make[3]: /home/pascaldev/trunk/fpc/utils/fpcm/fpcmake: Command not found
 ...

 fpcmake indeed does not exist there.


I got a different problem on poerpc-darwin with r24621:
https://fpcbuildserver.firmos.at/job/buildfpc_branch/platform=powerpc-darwin/902/console
It hangs.
Back trace:
(gdb) bt
#0  0x900144ac in read ()
#1  0x00082490 in BASEUNIX_$$_FPREAD$LONGINT$formal$LONGWORD$$LONGINT ()
#2  0x0007e608 in SYSUTILS_$$_FILEREAD$LONGINT$formal$LONGINT$$LONGINT ()
#3  0x00086bb4 in
CLASSES$_$THANDLESTREAM_$__$$_READ$formal$LONGINT$$LONGINT ()
#4  0x000c9b2c in
PIPES$_$TINPUTPIPESTREAM_$__$$_READ$formal$LONGINT$$LONGINT ()
#5  0x00012a1c in
P$FPMAKE$_$FPCM_UPDATE_REVISION_INFO$TOBJECT_$$_READSVNLINE$TPROCESS$ANSISTRING$$BOOLEAN
()
#6  0x000123f0 in P$FPMAKE_$$_FPCM_UPDATE_REVISION_INFO$TOBJECT ()
#7  0x000542e8 in FPMKUNIT$_$TBUILDENGINE_$__$$_DOBEFORECOMPILE$TPACKAGE ()
#8  0x00056000 in FPMKUNIT$_$TBUILDENGINE_$__$$_COMPILE$TPACKAGE ()
#9  0x0005726c in FPMKUNIT$_$TBUILDENGINE_$__$$_MAYBECOMPILE$TPACKAGE ()
#10 0x00058f38 in FPMKUNIT$_$TBUILDENGINE_$__$$_COMPILE$TPACKAGES ()
#11 0x0004deb0 in FPMKUNIT$_$TCUSTOMINSTALLER_$__$$_COMPILE$BOOLEAN ()
#12 0x0004e1dc in FPMKUNIT$_$TCUSTOMINSTALLER_$__$$_RUN$$BOOLEAN ()
#13 0x000187c0 in PASCALMAIN ()
#14 0x0003f314 in SYSTEM_$$_FPC_SYSTEMMAIN$LONGINT$PPCHAR$PPCHAR ()
#15 0x0001155c in start ()

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

Re: [fpc-pascal] Trunk seems to break again!?!?

[Vincent Snijders]

2013/5/27 Jonas Maebe jonas.ma...@elis.ugent.be


 On 27 May 2013, at 09:58, Vincent Snijders wrote:

 I got a different problem on poerpc-darwin with r24621:
 https://fpcbuildserver.firmos.**at/job/buildfpc_branch/**
 platform=powerpc-darwin/902/**consolehttps://fpcbuildserver.firmos.at/job/buildfpc_branch/platform=powerpc-darwin/902/console
 It hangs.


 I've fixed this problem. It was caused by the use of an unitialized value.
 Make sure to distclean first, because otherwise the old, buggy compiled
 fpmake version will be used again. Since fpmake has to be compiled by
 something else that knows about dependencies anyway (either a Makefile or
 some other fpmake), its dependencies should be properly specified so that
 an fpmake is compiled when any of its included files changes.



Thanks. The hang has been fixed.

Now it just fails:
Start compiling package h2pas for target powerpc-darwin.
Executing command /sw/bin/pyacc h2pas/h2pas.y h2pas/h2pas.pas
The installer encountered the following error:
External command /sw/bin/pyacc h2pas/h2pas.y h2pas/h2pas.pas failed with
exit code 1. Console output:
TP Yacc Version 4.1a [April 2000], Copyright (c) 1990-2000 Albert Graef

FATAL: cannot open file /usr/local/lib/fpc/lexyacc/yyparse.cod

Is that due to an incomplete installation of the release compiler (missing
yyparse.cod)?

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

Re: [fpc-pascal] Trunk seems to break again!?!?

[Vincent Snijders]

2013/5/27 Joost van der Sluis jo...@cnoc.nl


 It uses the pyacc that is already installed on the system. So unless
 that version is installed using fpmake, this problem did already exist.

 But the underlying problem is that h2pas.pas is generated again. That
 should not be necessary. It is probably fixed in r24624. Can you check
 that? Please do a make distclean first.


Yes, I can build as before.

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

Re: [fpc-pascal] FPC trunk r224549 needs more incantations?

[Vincent Snijders]

2013/5/22 Reinier Olislagers reinierolislag...@gmail.com

 r24549 | joost | 2013-05-21 21:58:14 +0200 (di, 21 mei 2013) | 1 line

  * Removed unused unit jarparamparser.pas

 Perhaps some (fp(c))make regeneration or something?

 Building it I see:
 make.exe[3]: Leaving directory `C:/development/fpctrunk/utils/fpcres'
 make.exe[3]: *** No rule to make target `jarparamparser.pas', needed by
 `fpcjres
 .exe'.  Stop.
 make.exe[2]: *** [fpcres_all] Error 2
 make.exe[2]: Leaving directory `C:/development/fpctrunk/utils'

See also:
https://fpcbuildserver.firmos.at/job/buildfpc_branch/850/platform=i386-linux/console

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

[fpc-pascal] Re: [FPC 0024437]: can not build RTL with 2.7.1 compiler

[Vincent Snijders]

--
  (0067718) Vincent Snijders (manager) - 2013-05-16 18:39
  http://bugs.freepascal.org/view.php?id=24437#c67718
 --
 That compiler is too old, it should be the same revision as the RTL source.

 --
  (0067719) Jonas Maebe (manager) - 2013-05-16 18:57
  http://bugs.freepascal.org/view.php?id=24437#c67719
 --
 No, the starting compiler is too new. Compiling a new compiler directly
 using an
 old compiler and old RTL (in order to then compile the new RTL with the
 resulting compiler) is not supported either.

 The only procedure that has always been supported and always only will be
 supported is a make all in the top level FPC directory starting with the
 latest release.


Compiling the RTL of revision 24514 with a compiler of revision 24514 is
supported, isn't it?

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

Re: [fpc-pascal] Re: Hashes and CRCs

[Vincent Snijders]

2013/4/7 Reinier Olislagers reinierolislag...@gmail.com

 Apart from that, the wiki already has a huge list of components etc. If
 dpcrypt on Laz CCR is missing, it should be added.


You can find it at:
http://wiki.lazarus.freepascal.org/DCPcrypt
Vincent
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Hashes and CRCs

[Vincent Snijders]

2013/4/5 Mark Morgan Lloyd markmll.fpc-pas...@telemetry.co.uk

 I agree, Google completely overlooked it when I was searching last night.
 I don't see why it should be put into CCR etc. when it's readily available
 from the original author, unless of course he's chosen to do so.

 Because at that time it was not fpc/lazarus compatible and the person who
put in lazarus-ccr chose to share it, instead of keeping the port by
himself.


 The truth is that FPC/Lazarus are still lacking something like Torry, and
 much of the freeware libraries or source that used to be indexed by it is
 probably now unavailable.

I guess that is what the founder of Lazarus-CCR attempted to create, a
repository of Lazarus components.

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

Re: [fpc-pascal] x86 asm bswap

[Vincent Snijders]

2013/2/6 Juha Manninen juha.mannine...@gmail.com:
 I read that bswap is used for converting big-endian (Intel) format to
 little-endian (Motorolla etc.) format.
 However this a an old Delphi app, Win32 only.

I am confused. Intel i386 is little endian. Motorola Powerpc is big endian.

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

Re: [fpc-pascal] Free Pascal 2.6.2 rc1

[Vincent Snijders]

2012/11/28 Bart bartjun...@gmail.com

 On 11/27/12, Pierre Free Pascal pie...@freepascal.org wrote:

I have uploaded a fpc-2.6.2rc1.i386-win95.exe
  ,in the same directory beta/2.6.2-rc1/i386-win32,

 Sorry to say, but I cannot find that file on
 ftp://freepascal.stack.nl/pub/fpc/beta/2.6.2-rc1/i386-win32/

 It only lists:
 fpc-2.6.2rc1.arm-wince.exe  13273 KB29-10-2012  18:25:00
 fpc-2.6.2rc1.i386-win32.exe 40049 KB29-10-2012  18:21:00
 fpc-2.6.2rc1.x86_64-win64.exe   22271 KB29-10-2012  19:09:00

 Tested on 2012-11-28 0:10 CET


And during the night mirrors have sync-ed.

It was probably uploaded to ftp.freepascal.org.

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

Re: [fpc-pascal] Change Endian of String types

[Vincent Snijders]

2012/11/26 ik ido...@gmail.com

 Hello,

 Is there a way to convert endian of a string (from little to big and
 vice versa) ?

What kind of string you want to convert? For example a PChar is trivial.

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

Re: [fpc-pascal] Re: Free Pascal 2.6.2 rc1

[Vincent Snijders]

2012/11/13 Reinier Olislagers reinierolislag...@gmail.com


 I noticed the i386-win32/ directory has wince+win64 installers as well
 as the i386 ones.
 Maybe these could/should be moved to their own directories arm-wince and
 x86_64-win64?
 Of course, the main thing is that they're there ;)


I think they are win32 to wince or win64 cross compiler, no native
compilers, that's why.

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

Re: [fpc-pascal] releasing commercial components as PPU files

[Vincent Snijders]

2012/10/22 Graeme Geldenhuys gra...@geldenhuys.co.uk:
 On 2012-10-22 14:36, michael.vancann...@wisa.be wrote:

 I am not sure whether they use the binary release of fpc, or if they compile
 their own for e.g. windows. If it is the latter, you're in problems.


 Anybody from the Lazarus development team that can comment here?


I am more optimistic than Michael. Because the same source is used,
the CRC is the same and no recompile is done.

So, as long they use unmodified RTL, FCL, (and LCL, if the component
depends on it), then there is no problem.

For use in the IDE, the interface of the source should be made available:
http://wiki.freepascal.org/Lazarus_Packages#Creating_a_closed_sourced_package

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

Re: [fpc-pascal] releasing commercial components as PPU files

[Vincent Snijders]

2012/10/22  michael.vancann...@wisa.be:


 On Mon, 22 Oct 2012, Vincent Snijders wrote:

 I am more optimistic than Michael. Because the same source is used,
 the CRC is the same and no recompile is done.


 It also depends on the date of the .ppu ?

I don't think so. But I don't mind to be proven otherwise.

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

Re: [fpc-pascal] Re: problems compiling FPC

[Vincent Snijders]

2012/10/17 Marco van de Voort mar...@stack.nl:
 D:\repo\fpcmake all
 makefile:2717: *** The only supported starting compiler version is 2.6.0.
 You are trying to build with 2.7.1. If you are absolutely sure that the 
 current
 compiler is built from the exact same version/revision, you can try to use
 OVERRIDEVERSIONCHECK=1 to override .  Stop.

 + a ifndef crosscompile around the whole version check.

 I thought about the 2.6.0-2.6.2 transition, but it is easy to temporarily
 wrap another version check around it for a few weeks. More work, but not a
 problem. (just needs documentation in rel_eng)

Alternatively, it could just be a warning. Then if it fails later, the
complete output will show the reason.

Then OVERRIDEVERSIONCHECK is not necessary anymore.

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

Re: [fpc-pascal] problems compiling FPC

[Vincent Snijders]

2012/10/16  dhkblas...@zeelandnet.nl:
 The starting compiler is also from SVN (21955).
 On 16 okt '12, mar...@stack.nl wrote:

 It should be 2.6.0, and nothing else.

Then the solution is simple, use fpc 2.6.0.

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

Re: [fpc-pascal] Error: Can't take the address of constant expressions

[Vincent Snijders]

2012/9/25 Bernd prof7...@gmail.com:
 2012/9/25 patspiper patspi...@gmail.com:
 procedure test;
 begin
   Move(MyClass1.Ref.Data^, MyClass2.Ref.Data^, 1);
 end;

 and if you cast it to some other pointer type before dereferencing the
 error goes away:

 procedure test;
 begin
   Move(MyClass1.Ref.Data^, PByte(MyClass2.Ref.Data)^, 1);
 end;

 But this should not be necessary.

Why not?  The error is correct. By using the type cast you tell the
compiler you know what you are doing and that is should not bother
doing the sanity check.

So IMO, not a bug.

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

Re: [fpc-pascal] Windows installer fails to add fpc binaries to PATH

[Vincent Snijders]

2012/9/14 Andrew Pennebaker andrew.penneba...@gmail.com:
 It did work perfectly on my Win7 laptop.
 You might want to haveadministrator privileges whilst installing
 (IIRC modifying the global PATH variable requires administrator
 privileges).


 I do have administrator privileges, and the installer could be built to
 modify the user's PATH variable instead of the system global PATH variable.
 Not sure which one the installer currently tries. If the installer does need
 to modify system global PATH, and it failed to do so, it should display an
 error message about this.

In that case is modfies the user's path variable.

 here's the possibility that with your previous experience using Free Pascal,
 you happened to manually modify PATH at some point, and then ran the Free
 Pascal installer. Can you help us rule this out by temporarily removing the
 Free Pascal binaries from your PATH, rerunning the installer, and verifying
 that the installer really does modify PATH? In particular, could you paste
 the results of echo %PATH% before and after you rerun the installer?

Well, I just checked:
http://svn.freepascal.org/cgi-bin/viewvc.cgi/trunk/install/fpc.ist?view=annotateroot=fpcbuild
around line 253 and further.

It matches my experience.

Maybe you are using Windows ME or older windows versions.

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

Re: [fpc-pascal] Re: Windows installer fails to add fpc binaries to PATH

[Vincent Snijders]

2012/9/14 leledumbo leledumbo_c...@yahoo.co.id:
 I don't even remember the installer ever tries to add something to PATH...



Still, it does.

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

Re: [fpc-pascal] Constant of 2D array

[Vincent Snijders]

2012/9/11 Felipe Monteiro de Carvalho felipemonteiro.carva...@gmail.com:
 Hello,

 Can I write constants of a 2D array? I am trying to convert some C++
 code which uses this ... so far I tryed:

 const number_return_map: array[0..7][0..7] of U8 =

const number_return_map: array[0..7,0..7] of byte =

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

Re: [fpc-pascal] Wiki search broken?

[Vincent Snijders]

2012/8/27 Andrew Haines andrewd...@aol.com:
 On 08/27/12 00:27, Vincent Snijders wrote:

 2012/8/27 Andrew Haines andrewd...@aol.com:

 Hi,

 Search seems to be broken for me on the wiki


 What was your search word?


 I typed in the search box on the bottom right on this page:
 http://freepascal.org/

 deprecated no quotes


That is probably not the wiki, but the fpc communitiy search. You can
search the wiki from here:
http://wiki.freepascal.org/Special:Search

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

Re: [fpc-pascal] Wiki search broken?

[Vincent Snijders]

2012/8/27 Andrew Haines andrewd...@aol.com:
 Hi,

 Search seems to be broken for me on the wiki


What was your search word?

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

Re: [fpc-pascal] wiki down again?

[Vincent Snijders]

2012/8/20 Chadisko konradchrist...@googlemail.com:
 is the freepascal wiki down again?


It is working OK now.

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

Re: [fpc-pascal] Re: Problems with assigning pointers

[Vincent Snijders]

Op 10 april 2012 22:06 heeft Darius Blaszyk dhkblas...@zeelandnet.nl
het volgende geschreven:
 Here's a minimal example that has the bug. First of all the first output is 
 wrong as it says 0,50 instead of 20,50 (so the x item is overwritten). The 
 second printed output differs from the first, so again the x item is 
 overwritten. I'm clueless.

 program test;

 {$mode objfpc}{$H+}

 type
  TVertex = record
    x: double;
    y: double;
  end;
  PVertex = ^TVertex;

  TEdge = record
    v1: PVertex;
    v2: PVertex;
  end;

 var
  vert_count: integer = 0;
  vert_list: array of TVertex;
  edge_count: integer = 0;
  edge_list: array of TEdge;

 function add_vert(x, y: double): PVertex;
 begin
  Inc(vert_count);
  SetLength(vert_list, vert_count);

  vert_list[vert_count - 1].x := x;
  vert_list[vert_count - 1].y := y;

  Result := @vert_list[vert_count - 1];

I think this is not correct. If you increase the size of vert_list,
then the array may be relocated and Result isn't a valid pointer
anymore.

 end;

 procedure add_edge(v1, v2: PVertex);
 begin
  Inc(edge_count);
  SetLength(edge_list, edge_count);

  WriteLn(v1^.x,' ',v1^.y); // this
  edge_list[edge_count - 1].v1 := v1;
  WriteLn(v1^.x,' ',v1^.y); // outputs the same thing as this
  edge_list[edge_count - 1].v2 := v2;
 end;

 var
  v1: PVertex;
  v2: PVertex;

 begin
  v1 := add_vert(20, 50);
  v2 := add_vert(220, 50);

  add_edge(v1, v2);

  readln;
 end.


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

[fpc-pascal] wiki on a new server

[Vincent Snijders]

Hi,

The Free Pascal and Lazarus wiki has been moved to a new server. Also
the wiki software has been upgraded to the latest Mediawiki version.
Because porting the custom Free Pascal skin to the new version was too
time consuming the default monoskin is used now. Therefore you will
notice changes in its appearance.

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

Re: [fpc-pascal] Where and how is the FPC documentation created?

[Vincent Snijders]

Op 29 februari 2012 16:29 heeft Frank Church vfcli...@gmail.com het
volgende geschreven:
 4. Is there some page where previous versions are available?

 PS. After some searching questions 2, 3 and 4 are answered -
 http://svn.freepascal.org/svn/fpcdocs/.

or: http://svn.freepascal.org/cgi-bin/viewvc.cgi/?root=docs

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

Re: [fpc-pascal] Where and how is the FPC documentation created?

[Vincent Snijders]

Op 29 februari 2012 18:57 heeft Frank Church vfcli...@gmail.com het
volgende geschreven:

 How often do you update it?

See:
http://svn.freepascal.org/svn/logs/fpcdocs-trunk.log

(also available with viewvc).

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

Re: [fpc-pascal] Request for Win32 bootstrap compiler on ftp.freepascal.org/

[Vincent Snijders]

Op 27 januari 2012 14:00 heeft Marco van de Voort mar...@stack.nl
het volgende geschreven:
 One can try to cut corners, but that will only end up having to install the
 release anyway at the first hickup.

I'd expect the utils in fpcbuild/trunk to be able to build fpc/trunk
better than the release ones, otherwise they should not be committed
to fpcbuild/trunk.

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

Re: [fpc-pascal] Re: Installing FPC 2.5.1 in Mac OS X

[Vincent Snijders]

2012/1/5 Marco van de Voort mar...@stack.nl:
 In our previous episode, shiruba2012 said:
 I had the same issue when specifying a specific compiler in Lazarus.  I
 changed the directory back to

 /usr/local/bin/ppc386

 and it worked fine.  I almost created another SymLink (as you did), and
 since that obviously works as well, the issue seems to be that Lazarus looks
 for fpcres in the same directory as the compiler, without making that clear.

 Since this makes the compiler selection option useless (unless you want to
 make a lot of SymLinks by hand), there should probably be a separate option
 for the FPCRes location, no?

 Well, aside from installing different compilers in different prefixes (what
 I usually do), yes.

 I would file a bug, and see how Laz devels see it.

I'd say it is a compiler bug, because the compiler doesn't look in the
right places, does it? Lazarus does do the looking for fpcres, but the
compiler.

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

Re: [fpc-pascal] debian control files for fpc

[Vincent Snijders]

2011/12/18 David Emerson dle...@angelbase.com:
 I'd like to roll my own fpc-2.4.4 .deb for in-house development

 The lazarus sources seem to include a debian directory with all the control
 files, which is wonderful!

 Where can I find debian control files for fpc?

In the fpcbuild svn repository:
http://svn.freepascal.org/svn/fpcbuild/trunk/install/debian/

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

Re: [fpc-pascal] Testing applications with FPCUnit

[Vincent Snijders]

2011/12/16 luciano de souza luchya...@gmail.com:
 Hello listers,

 Navigating in FPC source codes, I found fpcunit. It's really
 wonderful. With the tTestCase class, we can  generate a report with
 the success or the failure of our tests.

 Is there documentation on the usage of fpcunit? What is the best way
 to study it?

Google found this (old) article:
http://www.freepascal.org/olddocs-html/fpcunit.pdf

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

Re: [fpc-pascal] Why is Random(255) some 529x slower compared to Delphi 7?

[Vincent Snijders]

2011/12/7 Graeme Geldenhuys graemeg.li...@gmail.com:
 Hi,

 I did a simple GetTickCount() timing around this loop. Delphi executes
 the loop in 20 ticks. FPC 2.6.0-rc2 takes 10585 ticks The outer
 loop runs 200400 iterations. The types for BitValue, ByteValue and
 RandSeed is of type Byte.

 01  for Index := 1 to Length(Source) do
 02  begin
 03    OrdValue := Ord(Source[Index]);
 04    for BitCount := 0 to 7 do
 05    begin
 06      BitValue := Byte(OrdValue and (1 shl BitCount) = 1 shl BitCount);
 07      RandSeed := ByteValue;
 08      ByteValue := (((Random(255) + 1) div 2) * 2) + BitValue;
 09      Result[(Index - 1) * 8 + BitCount + 1] := AnsiChar(ByteValue);
 10    end;
 11  end;


I have one question about this code, why is RandSeed set inside the
loop and not outside the loop or even at the program start?
If you change the randseed, then the random number generator has to be
initialized and that is more costly for a stateful RNG as the mersenne
twister.

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

Re: [fpc-pascal] Why is Random(255) some 529x slower compared to Delphi 7?

[Vincent Snijders]

2011/12/8 Graeme Geldenhuys graemeg.li...@gmail.com:
 On 8 December 2011 09:25, Felipe Monteiro de Carvalho wrote:

 And what if it changes in the future to being slow and statistically
 strong, we change again too?

 The random number generator can be implemented in such a way that the
 backend generator is user selectable.


 And what about people using FPC only and depending on our Random being
 statistically strong, they are less important then theorical Delphi
 migrants?

 [like what was told to me numerous times before]  They (FPC users)
 should speak up now, or forever hold your peace.

When I used fpc in past to write statistical simulation I also
investigated the random number generator and was pleased to see that
it used the Mersenne Twister. I hope a upcoming change won't break my
programs or make there outcome suspect because of the poor quality of
the random number generator.

Writing a fast number generator is almost a one liner:
http://en.wikipedia.org/wiki/Linear_congruential_generator

Vincent (not holding his peace)
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Premature end of headers using fcl-web and POST

[Vincent Snijders]

2011/11/1 Felipe Monteiro de Carvalho felipemonteiro.carva...@gmail.com:
 On Mon, Oct 31, 2011 at 7:30 PM, Michael Van Canneyt
 mich...@freepascal.org wrote:
 So it seems that you MUST set the contenttype either to
 MULTIPART/FORM-DATA or APPLICATION/X-WWW-FORM-URLENCODED.

 Yes, this is as per the HTML specs.

 They actually prohibit sending arbitrary data? oh, boy, these people
 like rules and inneficiency =D But there must be something missing
 here, because file upload is possible, and there you send arbitrary
 data.


You can send arbitrary data using MULTIPART/FORM-DATA

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

Re: [fpc-pascal] How to insert a record and get the primary key with sqldb?

[Vincent Snijders]

2011/10/22 Graeme Geldenhuys graemeg.li...@gmail.com:
 1) Use a GUID created at the time you do the Insert. This also means
 you can do Master/Detail records with no problems at all.

I consider this bad advice. GUID are bad primary keys, because of
their size and the fact they are not sequential by design.

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

Re: [fpc-pascal] How to insert a record and get the primary key with sqldb?

[Vincent Snijders]

2011/10/24  michael.vancann...@wisa.be:


 On Mon, 24 Oct 2011, Vincent Snijders wrote:

 2011/10/22 Graeme Geldenhuys graemeg.li...@gmail.com:

 1) Use a GUID created at the time you do the Insert. This also means
 you can do Master/Detail records with no problems at all.

 I consider this bad advice. GUID are bad primary keys, because of
 their size and the fact they are not sequential by design.

 You just discarded most Microsoft product designs =-)
 They use GUIDs all over the place :-)

Still, I won't use them as primary (clustered) key in Microsoft sql
server. If the business rules require a guid, it may become a unique
key in the table, but not a primary key.

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

Re: [fpc-pascal] fpc has trouble with array types

[Vincent Snijders]

2011/10/18 Sven Barth pascaldra...@googlemail.com:
 Am 18.10.2011 11:12, schrieb Sven Barth:

 type
 TByteArray = array of Byte;

 function XlatPrime(): TByteArray;
 begin
 XlatPrime := TByteArray.Create(
 $64, $73, $66, $64, $3b, $6b, $66, $6f,
 $41, $2c, $2e, $69, $79, $65, $77, $72,
 $6b, $6c, $64, $4a, $4b, $44, $48, $53,
 $55, $42, $73, $67, $76, $63, $61, $36,
 $39, $38, $33, $34, $6e, $63, $78, $76,
 $39, $38, $37, $33, $32, $35, $34, $6b,
 $3b, $66, $67, $38, $37
 );
 end;

 Before I forget it: If you use this solution (not the const one) or you use
 SetLength, you need to free the array using SetLength(0) or
 YourArrayVariable := Nil, otherwise you'll have a memory leak. You must
 not do this if you use the const solution.

That is unexpected. Until now, SetLength was used for ansistrings and
dynamic arrays, which didn't have this requirement (unless you messed
with the internals using Move).

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

Re: [fpc-pascal] fpc has trouble with array types

[Vincent Snijders]

2011/10/18 Andrew Pennebaker andrew.penneba...@gmail.com:
 But, but, the docs imply that this is the syntax for a function that returns
 an array of bytes.


Where in the docs did you read this?

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

Re: [fpc-pascal] More Filter Madness

[Vincent Snijders]

2011/10/14 Ko Hashiguchi ko.d.hashigu...@gmail.com:
 Mine is more of a programming problem, rather than one native to Pascal, but
 here goes:

 I have a text file with many Double values. Looking more or less like below,
 but with hundreds of entries...

 1.5
 3.25
 7.54
 10.33
 2.22

 The values listed are only for illustration. What I need to do is read the
 values in the first file and sum them up such that the output file starts
 with the first value, the second entry in the output file is the sum of the
 first AND second values, the third entry in the output file is the sum of
 the first, second and third values of the input file:

var
  infile: text;
  outfile: text;
  sum: double;
  value: double;

begin
  assign(infile, ...);
  assign(outfile, ...);
  reset(infile);
  rewrite(outfile);
  sum := 0;
  while not eof(infile) do begin
readln(infile, value);
sum := sum + value'
writeln(outfile, sum);
  end;
end.

Depending on how many numbers you read and the difference between
magnitude of sum and value, you may have to do some extra work for the
numeric stability. but that is for later concern.

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

Re: [fpc-pascal] More Filter Madness

[Vincent Snijders]

2011/10/14 Graeme Geldenhuys graemeg.li...@gmail.com:
 On 14/10/2011 08:49, Vincent Snijders wrote:

 Depending on how many numbers you read and the difference between
 

 The original poster's questions sounds very much like a homework
 assignment, which you have no done for him. Naughty!

The thought crossed my mind and therefore I googled Ko Hashiguchi
pascal and found this:
http://free-pascal-general.1045716.n5.nabble.com/Odd-delimited-text-file-length-limitations-td4550913.html

I took the risk...

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

[fpc-pascal] Reusing a TProcess object (issue 19997)

[Vincent Snijders]

Hi,

Is it allowed to execute a TProcess object more than once? And if yes,
different command lines be used?

The reason I ask is issue 19997, each invocation of the compiler in
Lazarus leaks a process handle and a thread handle on windows. (not
tested on other OS-es).

If is it allowed to re-use TProcess object, how can it be done without
leaking handles?

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

Re: [fpc-pascal] fpmake exception

[Vincent Snijders]

2011/8/18 Henry Vermaak henry.verm...@gmail.com:
 Hello

 While building fpc on my arm netbook, I found this crash in fpmake:

 EAccessViolation : Access violation
  $00027448  FIXPATH,  line 1737 of src/fpmkunit.pp
  $00039E24  TTARGET__SETNAME,  line 5577 of src/fpmkunit.pp
  $00027F24  TTARGETS__ADDEXAMPLEPROGRAM,  line 2174 of src/fpmkunit.pp
  $88F4  main,  line 65 of fpmake.pp

 Attached one-line patch fixes it for me.  Can someone apply it now, or shall
 I file a bug-report?

I think the uniquestring call should be just before
P:=PChar(Result);

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

Re: [fpc-pascal] Virtual inline methods

[Vincent Snijders]

2011/8/18  dhkblas...@zeelandnet.nl:

 I'm porting a piece of code from C++ and there they use virtual inline
 methods. I tried it in FPC but it accepts either virtual OR inline methods.
 Is this a bug, or a feature that I don't understand enough about?

At first I didn't understand how a virtual function can be inlined (in
C++), but after reading
http://msdn.microsoft.com/en-us/magazine/cc301407.aspx I understand.

I think fpc is not optimizing so much that it can detect when a
virtual function can be inlined. But maybe WPO
(http://wiki.freepascal.org/Whole_Program_Optimization) can do
something similar.

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

Re: Re[2]: [fpc-pascal] TimSort

[Vincent Snijders]

2011/5/24 José Mejuto joshy...@gmail.com:
 Hello FPC-Pascal,

 Tuesday, May 24, 2011, 1:06:43 PM, you wrote:

   Why is TimSort specially interesting to you ?
 MG  I need a fast stable sort, so multiple sorts work as expected (contrary 
 to
 MG QuickSort).
 MG  TimSort is a candidate.

 That's exactly the answer I was looking for, the stability need ;)
 I'll try to write an implementation to expand my sorters collection :)
 but the algo seems quite confuse and plenty of tricks.

I suggest you start from the explanation on
http://svn.python.org/projects/python/trunk/Objects/listsort.txt

The same text be found on other places too.

I more or less explains the algorithm, which you can implement without
copyright restrictions, don't you think?

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

Re: [fpc-pascal] Re: Register variables slowing down floating point operations

[Vincent Snijders]

2011/5/13 Marcos Douglas m...@delfire.net:
 So, not to use the option -O in i386?
 When I compile FPC sources, on Win32 XP SP3, using make, the option is used.

 I'm confusing now...

Did you try one of the -Cf options to enable MMX on i386?

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

Re: [fpc-pascal] Installing FPC 2.5.1 in Mac OS X

[Vincent Snijders]

2011/4/15 Felipe Monteiro de Carvalho felipemonteiro.carva...@gmail.com:
 On Fri, Apr 15, 2011 at 4:11 PM, Jonas Maebe jonas.ma...@elis.ugent.be 
 wrote:
 And does it work when you manually execute it?

 As in just typing: fpcres ?


IIRC, with -va or -vd, ppc386 shows the fpcres command line. Can you use that?

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

Re: [fpc-pascal] Is there a problem on the lazarus mailing list?

[Vincent Snijders]

2011/4/12 Luca Olivetti l...@ventoso.org:
 Sorry for the off-topic, but I sent a message yesterday to the lazarus
 mailing list and it hasn't appeared.
 In fact there aren't new messages since last Sunday.
 Does anybody know if is there a problem with the lazarus list server?

I restarted mailman, and that seems to have fixed the issue.

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

Re: [fpc-pascal] Convert error hex string to cardinal....

[Vincent Snijders]

2011/1/17 Bo Berglund bo.bergl...@gmail.com:
 I have encountered a conversion error using FPC 2.4.2 with Lazarus
 0.9.29 as follows:

 var
  t: Int64;
  v: string;
 begin
  ...
  t := StrToInt('$' + v);

 This gives an exception invalid integer. At this moment v is
 '577B4D58A51A0EE', which combined with the $ sign makes it a valid hex
 Int64 as far as I can see.

For Int64 use StrToInt64:
http://lazarus-ccr.sourceforge.net/docs/rtl/sysutils/strtoint64.html

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

Re: [fpc-pascal] The new Delphi 2010 RTTI

[Vincent Snijders]

2011/1/10 alexv...@mail.ru alexv...@mail.ru:

 But I want packages to be binary portable between OS (on target processor
 architecture)


I don't think that is feasible, unless you don't use any OS features.

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

Re: [fpc-pascal] Help building fpc svn Win64

[Vincent Snijders]

2011/1/5 Marco van de Voort mar...@stack.nl:
 This snapshot is missing the cmp.exe file, so I had used the win32
 one. After an error about not found as.exe I had used the win32
 version too, but now I'm stuck at an ld.exe problem. The win32 version
 of ld.exe does not have a pei-x86-64 target so the make process
 stops.

I would not build the fp ide.


 Use
 ftp://ftp.freepascal.org/pub/fpc/contrib/cross/mingw/win64/

I think the necessary files should be added to
http://svn.freepascal.org/svn/fpcbuild/trunk/install/binw64/

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

Re: [fpc-pascal] Help building fpc svn Win64

[Vincent Snijders]

2011/1/5 Marco van de Voort mar...@stack.nl:

 I would not build the fp ide.

 Does that remark apply to 2.4.x or 2.5.1?

2.5.1, because AFAIK, Pierre's work that requires the external linker
on win64 is done in trunk only and not yet merged to 2.4.2.

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

Re: [fpc-pascal] Unicode strings

[Vincent Snijders]

2010/12/31 Juha Manninen juha.mannine...@gmail.com:
 UTF-16 needs codepages, too.

I don't think so. What would a code page be used for with UTF-16.

UTF-16 itself is already an encoding, implictly stating one and only
one code page, if it can be named  a code page.

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

Re: [fpc-pascal] Progress indication while linking

[Vincent Snijders]

2010/12/28 Mark Morgan Lloyd markmll.fpc-pas...@telemetry.co.uk:
 Jonas Maebe wrote:

 On 28 Dec 2010, at 11:04, Mark Morgan Lloyd wrote:

 Is it possible to get any sort of activity indication that confirms that
 the linker is actually doing something useful, rather than just sitting
 there locked up?

 No, there isn't. FPC currently does not show any output from the linker,
 but even if it did I don't think there's any parameter you can give to the
 linker to make it print a progress report.

 Thanks Jonas- it's taking about a week to compile/link in the extreme case
 and something predictable- even if it was just a temporary file with a
 timestamp that changed predictably- would be really useful.

 Fortunately I've got a somewhat more powerful system that I can put Solaris
 on, but compared with Linux it really is a resource hog.

I did some experimenting. During linking I saw the lazarus executable
growing, so you could do a ls -l on it.
What also give some indication of progress is using OPT=-k-t which
outputs all input files.

On my computer, linking of lazarus is well under 1 min, so not
comparable. Between the last output of -k-t and the creation of new
lazarus executable is some time too, maybe that is a days for you,
without any output.

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

Re: [fpc-pascal] fpGUI powered by OpenGL

[Vincent Snijders]

2010/12/20  dhkblas...@zeelandnet.nl:
 But why is it not possible to integrate this with the regular fpGUI ?
 Can you explain in a couple of sentences ?

 Can't remember having said that it was impossible with the current approach.
 In fact it is perfectly doable. However (free)glut and opengl are already
 available on a large number of platforms/targets. So if fpGUI is built upon
 these libs then you immediately take the benefit of being able to support
 these platforms. Additionally you don't have to implement a complex
 interface between the different platforms this is handled already by glut
 and opengl for you. So in effect it could make fpGUI simpler. And the last
 plus is having a hardware accelerated gui. It just means it's lightning fast
 and that's a plus for UI's.
 Thats not all however, there are minusses. By using glut, you limit yourself
 to the supported platforms/targets. So if new platforms/targets come along
 then there is no way (unless you supply patches to the project) to add them.
 With the current approach you're free to do it yourself. Also the API is
 plain rigid. This means you'll have to adapt to that and live with it
 (notice it's a plus and minus depending on how you look at it). (That is why
 I would like to see a fpGlut some day ;) and believe me it will come to that
 eventually!)

 I probably forgot a few plusses and minusses, but that's about it as far as
 I'm concerned. Also I don't mean to say that using an opengl/glut backend is
 superior to the current ones. It just has other benefits I suppose.

The above explains why it is useful for an application developer to
use an openGL backend.

It does not explain the following: Since fpGUI already has two
backends (afaik, X and winap), why can't openGL a third one? Did you
change the way fpGUI interfaces with its backend? Is this change so
incompatible with the current backends, that they cannot be modified?

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

Re: [fpc-pascal] Please update ubuntu repository

[Vincent Snijders]

2010/12/12 Darius Blaszyk dhkblas...@zeelandnet.nl:
 Hi,

 When updating 2.4.0 to 2.4.2 I noticed that the Ubuntu repository on
 www.hu.freepascal.org, has not been updated yet. Could someone please
 upload the latest versions there? Or is this something experimental
 only?


It will be updated by me, when there is a new Lazarus release.

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

Re: [fpc-pascal] Suggestion about ability to pass local procedures as variables

[Vincent Snijders]

2010/11/30 Max Vlasov max.vla...@gmail.com:
 Hi,

 it appears recently several pieces if knowledge came to me, I understood how
 anonymous functions (aka closures) work :) and the fact that GNU Pascal
 allows passing local procedure as variables. I mentioned them together
 because as many I don't like the closures as they implemented everywhere
 including delphi (I read also the discussion here that was several month
 ago) and on the other side, I feel that allowing passing local procedures
 (if it's technically possible) is a better way to achieve the same. I mean,
 this will allow to catch local context for executing anything from external
 code (what's actually closures is about).

 So, I suppose that implementing closures is not in real plans (it's ok, I
 can live with that), but what about the second, is it possible?

 I will glad to hear different opinions from the developers


Nested procedural variables are a new feature in fpc 2.5.1. See:
http://svn.freepascal.org/cgi-bin/viewvc.cgi?view=revrevision=15656

I don't know if that is what you are asking for.

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

Re: [fpc-pascal] bugtracker questions/report (where to send)

[Vincent Snijders]

2010/11/26 Max Vlasov max.vla...@gmail.com:
 Hi,

 I have two questions:
 - Is everything is ok with steps to reproduce field in fpc bugtracker? It
 never show at the issue view. Hope it saves and and at least the developers
 are seeing it.

It is visible in the advanced view, not in the simple view.

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

Re: [fpc-pascal] Building FPC trunk on XP win64

[Vincent Snijders]

2010/11/26 Birger Jansen bir...@cnoc.nl:
 I'll see if I can find the missing cmp.exe in 64 bit version or try with the 
 32
 bit version.

 Copying the cmp.exe that comes with the Lazarus 32 bit installer to a 64 bit 
 installation worked.
 Can this file be included in the 64 bit installer to prevent nono's like me 
 running into the same problem in the future?

Yes, I think it is already added for the 64 bits installer with fpc
2.5.1, because it is in
http://svn.freepascal.org/svn/fpcbuild/trunk/install/binw64/

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

Re: [fpc-pascal] Re: Cross-compiling with FPC 2.5.1

[Vincent Snijders]

2010/10/26 patspiper patspi...@yahoo.com

 The buildcrossbinutils.sh script produces i686-mingw32- binaries only (no
 i686-cygwin-), and yet, FPC 2.4.2 cross compiles without any problem. What
 is different about 2.5.1?


Probably 2.5.1 contains assembler files, so it needs an assembler, 2.4.2
only pascal source fails, that the compiler can assemble.

Maybe for 2.4.2 you don't need any binutils, except windres maybe. Maybe
windres is not necessary  either and fpcres is used.

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

Re: [fpc-pascal] Re: Posting to the list via GMAIL

[Vincent Snijders]

2010/10/9 Bo Berglund bo.bergl...@gmail.com:
 So it seems like the GMANE maintainers have either not understood or not
 reconfigured this NG with the new setting.


I suggest you keep an eye on
http://gmane.org/info.php?group=gmane.comp.compilers.free-pascal.general

The list is still marked read-only. In the gmane FAQ it is said that
the response time is between some minutes and two weeks, so if after
two weeks, the list is still read-only, feel free to send them a
reminder, with a link to this thread.

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

Re: [fpc-pascal] How to get to Range Check Error location

[Vincent Snijders]

2010/10/2 Jonas Maebe jonas.ma...@elis.ugent.be:
 Because of -gh I am getting the following output always when closing
 Lazarus. Only the numbers change with Lazarus versions and compile options.

 Likely it is not a real error. Vincent Snijders suspected it is a bug in
 the
 way heaptrc does its counting in a 64-bit system. In a 32-bit system it
 works.

 As long as it says 0 unfreed memory blocks : 0, there is no problem.


I agree with Jonas, there is no problem.

True free heap : 1924768
Should be : 1048576

In my experience the should be line occurs on win32 as often as on win64.

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

Re: [fpc-pascal] How to get to Range Check Error location

[Vincent Snijders]

2010/10/2 Juha Manninen (gmail) juha.mannine...@gmail.com:
 The last 3 lines practically say Lazarus has a memory corruption or leak or
 something, while it does not have. It is OK not that I know it.

True heap size : 1048576
True free heap : 1924768
Should be : 1048576

It just says that heaptr didn't calculate the True free heap size correctly.

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

Re: [fpc-pascal] Initializing records and other complicated structures

[Vincent Snijders]

2010/9/28 Jürgen Hestermann juergen.hesterm...@gmx.de:
 Sven Barth schrieb:

 It's enough code, because FillByte (and others) are defined with a var
 parameter and such the hint (not a warning) won't go away.
 It's an old topic already and we have just to live with it (regarding the
 Fill* functions). ^^

 But why not simply change the definition of the variable to out? Then the
 Fill* functions would be recognized as initializing routines.

No, see http://bugs.freepascal.org/view.php?id=17020

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

Re: [fpc-pascal] What is wrong with this enum and array related code

[Vincent Snijders]

2010/9/12 Frank Church vfcli...@gmail.com:
 program testnums;
 //{$APPTYPE CONSOLE}

 uses
   Classes, SysUtils;
 type
    stType = (stLite := -100, stDb, stBothLite, stBothDb); //settings
 location Type
    stTypes = Array [stType] of integer;
 var
  d : stType;
  s : string;
  i : integer;
 begin
  writeln('');
  for i := Ord(low(stType)) to Ord(high(stType)) do
  begin
   d := stTypes[i - Ord(low(stType))];
    writestr(s,d);
    writeln(d + ' ' + IntToStr(Integer(i)));
  end;
  readln;

 end.

I think the array and enum are correct, but the usage isn't. I did not
compile this code, but I expect a type mismatch error. You are using
an integer as index in d := stTypes[i - Ord(low(stType))], but you
declared stTypes an array to be indexed by stType.
___
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] Re: What is wrong with this enum and array related code

[Vincent Snijders]

2010/9/12 Frank Church vfcli...@gmail.com:
 I need to elaborate more on this code

 On this line

 d := stTypes[i - Ord(low(stType))];

 since stTypes is an array, I expect stTypes[n], with n being 1 to 4,  to
 retrieve an array value and as 'i - Ord(low(stType)) evaluates to integer it
 should compile but it generates an error.

 What would be the correct way?

 On 12 September 2010 12:51, Frank Church vfcli...@gmail.com wrote:

 program testnums;
 //{$APPTYPE CONSOLE}

 uses
   Classes, SysUtils;
 type
    stType = (stLite := -100, stDb, stBothLite, stBothDb); //settings
 location Type
    stTypes = Array [stType] of integer;
 var
  d : stType;
  s : string;
  i : integer;

 begin
  writeln('');
  for i := Ord(low(stType)) to Ord(high(stType)) do
for  d:= low(stType) to high(stType) do

  begin
   d := stTypes[i - Ord(low(stType))];
i := stTypes[d];
    writestr(s,d);
    writeln(d + ' ' + IntToStr(Integer(i)));
  end;
  readln;

 end.

 --
 Frank Church

 ===
 http://devblog.brahmancreations.com



 --
 Frank Church

 ===
 http://devblog.brahmancreations.com

 ___
 fpc-pascal maillist  -  fpc-pas...@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] Anything like TRichView?

[Vincent Snijders]

CA Gorski schreef:

Is there anything like TRichView (www.trichview.com) for Lazarus/FPC?
Doesn't need to be as complex as that one. Can be much simpler, but
TMemo is too simple. ;)



Maybe: http://wiki.lazarus.freepascal.org/RichMemo

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

Re: [fpc-pascal] UTF8Decode

[Vincent Snijders]

Graeme Geldenhuys schreef:

Luis Fernando Del Aguila Mejía het geskryf:

Why WideString  is not equal to Unicodestring  in Windows?


WideString is reference counted (for Windows COM reasons). UnicodeString is
pretty much the same as WideString, but not reference counted.


I am pretty sure it is the other way around, UnicodeString is the 
unicode version of AnsiString and is thus reference counted. WideString 
is the OLEstring compatible string, and is not reference counted.


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

Re: [fpc-pascal] deprecated syntax is inconsistent.

[Vincent Snijders]

Graeme Geldenhuys schreef:

On 29 April 2010 17:23, Marco van de Voort mar...@stack.nl wrote:
Its got nothing to do with the latex package. Trying to describe the
inconsistent syntax of Hint Directives in a syntax diagram (like used
in the FPC Language Reference doc) just seems impossible. From what I
can conclude, you need to have something like a if xxx then yyy
meaning you will have a couple of diagrams say the syntax is like XXX,
BUT it is also like YYY, BUT you also get ZZZ... bla, bla. Do you guys
not see the issue?


I don't see the issue, it gets a bit more complicated, but not 
impossible. I am just bad in ascii graphics, but I can imagine how it 
looks like.


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

Re: [fpc-pascal] deprecated syntax is inconsistent.

[Vincent Snijders]

Graeme Geldenhuys schreef:

On 29 April 2010 21:57, Vincent Snijders vsnijd...@vodafonevast.nl wrote:

I don't see the issue, it gets a bit more complicated, but not impossible. I
am just bad in ascii graphics, but I can imagine how it looks like.



I'm sure Michael will welcome your patch, and I'll be eager to see it too.  ;-)




I don't need the patch, the text and the examples were good enough for me.

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

Re: [fpc-pascal] Question about Deleting elements in Dynamic Array

[Vincent Snijders]

Bihar Anwar schreef:

I've tried to use Move() instead of Copy(). Any objection with the following 
code?


Yes, at first glance without much thinking, I don't think it is safe. Did you think 
through the consequences of copying reference counted types (ansistring in this case 
 presumably)?




var
  a: array of string;


shortstring of ansistring?



SetLength(a, 5);
a[0] := 'aa'; a[1] := 'bb'; a[2] := 'cc'; a[3] := 'dd'; a[4] := 'ee';

System.Move(a[3], a[0], 2 * SizeOf(string) );// instead of  a := Copy(a, 3, 
2);
SetLength(a, 2);


Hmm, maybe you are lucky and this does work without crashes, because the contents of 
 the ansistrings are constants. If they were variable strings, then then the move 
would make a[3] and a[0] point to the same string (with reference count 1). The 
setlength would free it, because it frees the memory of the ansistring in a[3].


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

Re: [fpc-pascal] What project management tool does FPC developers use?

[Vincent Snijders]

Florian Klaempfl schreef:

Frank Church schrieb:

What project management tool does FPC and Lazarus developers use? I
mean besides mantis for bug tracking?


None, simply because we don't have any time budgets/resources but people
are working as soon as they find time.


I am thinking along the lines of JIRA, Redmine, Fogbugz etc.

It is hard to get a view of what things are progressing or what needs doing,


See mantis ;)


Mantis is important. For releases there is a sort of todo list in the wiki:
http://wiki.lazarus.freepascal.org/Lazarus_0.9.28_release_plan
and
http://wiki.lazarus.freepascal.org/Release_2.4.0

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

Re: [fpc-pascal] State of FPC docs.rant

[Vincent Snijders]

Joseph Montanez schreef:

rant

In the end I think automated documentation is bad, and thats really
what I see with the current state of FPC docs. It might allow better
ability to stay sync with the current release but not allowing _easy_
social interaction to expand those docs, I think it is a big mistake.
/rant


Is this in response to removing the direct link to unit reference docs 
with comments at http://www.hu.freepascal.org:1, that was not really 
used?


Vincent

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

Re: [fpc-pascal] FPC static linking of zlib

[Vincent Snijders]

Matthias Klumpp schreef:
I'm not sure if some version of zlib was translated to pascal; therefore 
having the same security issues, or if it was written from scratch, so 
that it won't have those security issues?

Not sure...
I should say that WinFF and easyMp3Gain do not use any ZLib function, so
ZLib should not be in the binary.


Just guessing or speculating: WinFF is a LCL application and that 
includes png support with a png reader that uses zlib for compression?


All of the above could be false, though.

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

Re: [fpc-pascal] New wiki, ftp and mailing list server planned

[Vincent Snijders]

Florian Klaempfl schreef:

Flávio Etrusco schrieb:

From the wiki, it's more interesting to pay in Euros, right?
Is the German PayPal only a localized version, or are they separate
corporations and I'd have to create a different account? And is there
a way to use the German site in English? ;)


Afaik not, it's a german store. But you can look up the server at their


Yes for the store.

uk branch:
http://www.alternate.eu/html/product/details.html?articleId=379777


Flavio asked about Paypal.

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

Re: [fpc-pascal] New wiki, ftp and mailing list server planned

[Vincent Snijders]

Florian Klaempfl schreef:

As you might have noticed, the server running the wiki (lazarus and
fpc), the mailing lists (lazarus and fpc) 


Just the fpc mailing lists. The Lazarus mailing lists are hosted on the 
same server that hosts the lazarus website and forum.


and being ftp master (fpc and

lazarus snapshots) had some hick ups during the last months due to
hardware problems so we want to replace it by something more reliable
because this is one of the two main servers of fpc and lazarus.


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

Re: [fpc-pascal] Thread IDs

[Vincent Snijders]

Wimpie Nortje schreef:



Jonas Maebe wrote:


On 18 Feb 2010, at 16:35, Wimpie Nortje wrote:


What is the difference between GetThreadID() and GetCurrentThreadID()?


There is a threadvar called threadid in the system unit. When a new 
thread is started, GetCurrentThreadID is called to obtain the thread 
id of the new thread (via the thread manager) and the result is stored 
in the threadid threadvar. GetThreadID simply returns the value of 
this threadvar.


So in summary: there is no semantic difference.

They return different values. I think GetCurrentThreadID is the more 
trustworthy one. When control returns to my main thread then 
GetCurrentThreadID = MainThreadID and GetThreadID MainThreadID


I found some inconsistencies a couple of months ago, but never got to 
creating a bug report:

http://www.mail-archive.com/fpc-pascal@lists.freepascal.org/msg17337.html

lists.freepascal.org seems down, so I found this link.

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

Re: [fpc-pascal] Locating the users HOME folder

[Vincent Snijders]

Michael Van Canneyt schreef:


No.

But it has been a regular request to add this to sysutils.

Please file a feature request in the bug tracker, so we won't forget it.
(preferably with implementation patch ;) )


Are you sure? Peter Vreman asked for a $HOME macro in lazarus and 
Mattias implemented after it was implemented in SysUtils.


http://www.freepascal.org/docs-html/rtl/sysutils/getuserdir.html

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

Re: [fpc-pascal] [OT] which editor - emacs?

[Vincent Snijders]

David Emerson schreef:
on multiple projects at once. Especially, e.g., if I want to test some 
feature or idea in a new little project, I tend to just do that in a 
separate editor rather than opening another group of lazarus windows or 
closing the big project I'm working on.




For such use case, there is the build file and run file functionality.
See also:
http://wiki.lazarus.freepascal.org/Lazarus_Tutorial#The_Run_sub-menu
http://wiki.lazarus.freepascal.org/IDE_Window:_Configure_Build_file

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

Re: [fpc-pascal] Free Pascal 2.4.0 released

[Vincent Snijders]

Doug Chamberlin schreef:

Florian Klaempfl wrote:

Doug Chamberlin schrieb:

Anyone know how soon this will be incorporated into the tar file that is
posted as the latest 2.4 download?


Never. 2.4.0 is out and finished.


OK. anyone know when this fix will be incorporated into the next tarball 
posted to be the latest 2.4.x download?




With fpc 2.4.2. AFAIK, it has not yet been scheduled, so at earliest 
next autumn, that is my guess.


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

Re: [fpc-pascal] Const Array Length (was Dynamic Array Length)

[Vincent Snijders]

Jürgen Hestermann schreef:




Juha Manninen schrieb:
const
  a: array of string = ('aaa', 'bbb', 'ccc');

It looks like a dynamic array, but obviously is not dynamic because it 
is constant. :-)

The indexing would start from 0 like with dynamic arrays.
It would not break the existing syntax and would be very intuitive.


I would appreciate such a change. I often have static lists in my programs,
which need to be changed from time to time.



I suggest you add an entry on 
http://wiki.lazarus.freepascal.org/Bounties#Multi-platform_bounties, so 
we know how much you would appreciate it.


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

Re: [fpc-pascal] RE: Possibly a dumb question.... (Jennifer Usher)

[Vincent Snijders]

Graeme Geldenhuys schreef:

2009/12/29 Joost van der Sluis jo...@cnoc.nl:

Please try again first using a recent snapshot. I think this bug is
solved long ago..


I don't have the problem under Linux, and I used Lazarus SVN of
yesterday (which I think is recent enough).  I don't know how to
override the '/tmp' in Lazarus to see if Lazarus IDE will have
problems with spaces in directory names under Linux too. As far as I
know Linux doesn't use a TEMP environment variable like Windows - /tmp
always exist under *nix type OSes so is normally a safe choice.



On linux *you* don't use project1.rc, so you don't miss it. Linux simply 
doesn't support icons in executables like windows does. It has nothing 
to do with the location on /tmp.


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

Re: [fpc-pascal] RE: Possibly a dumb question.... (Jennifer Usher)

[Vincent Snijders]

Jürgen Hestermann schreef:

I have been trying to compile a simple test program and I keep getting
the following errors:
c:\lazarus\fpc\2.2.4\bin\i386-win32\windres.exe: can't open file
`project1.manifest': No such file or directory

I am about a week ahead of you with Lazarus, and I struggled
with that error too. It seems you must save the project once
before you can compile it.  After the first save, you can make
changes and recompile without saving again, but that
first save seems to be crucial.


It's a bit astonishing that there is no check before compiling that 
brings up a save project dialog in such situations. 


It is a bug ans should save that file automatically.

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

Re: [fpc-pascal] Forum merger

[Vincent Snijders]

Graeme Geldenhuys schreef:

I really don't care
where projects are created - I think SourceForge or GitHub are more visible
and accessible by all. So that would be my first choice anyway.



I really don't care either. The most important thing now is that (at least) one 
person actually starts *coding* and making his source available. Where is not that 
important.


Vincent

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

Re: [fpc-pascal] Forum merger

[Vincent Snijders]

Matthias Klumpp schreef:



server, this is not really a problem.


Why don't use Git this time? 


A. Because there no Git Server on the FPC SVN server.


It's making code review and code merging from
other sources a lot easier.


I don't understand what you mean here.

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

Re: [fpc-pascal] Forum merger

[Vincent Snijders]

Graeme Geldenhuys schreef:

I agree with Mattias.



I didn't think Mattias commented on this thread. Do you mean Matthias, 
who suggested to use Git on the FPC svn server?


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

Re: [fpc-pascal] Possible bug in return value of MonthsBetween function in unit dateutils

[Vincent Snijders]

Funky Beast schreef:

Hi,

When trying to get the number of months between the following dates:
01-06-2009 and 01-08-2008

MonthsBetween returns: 9 months.

That is clearly wrong (fundamentally counting with my fingers yields 10 
months).
Looking at the function in dateutils.inc, I copied the function 
implementation to do a test.

Now, if I strip away Trunc() from the function, the result is: 9.98767967.
Trunc() simply strips away the decimals behind, which returns: 9.

I'm wondering if Round() should be used instead of Trunc().



For such easy question, I use google:
http://lmgtfy.com/?q=monthsbetween

http://www.freepascal.org/docs-html/rtl/dateutils/monthsbetween.html states that 
This number is an approximation, based on an average number of days of 30.4375 per 
month. 9 is approximately 10, so the is behavior you see is as documented ;-)


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

Re: [fpc-pascal] Help porting DeCAL library

[Vincent Snijders]

leledumbo schreef:

http://old.nabble.com/file/p26671529/decal-1.zip Here  is a FPC conversion of
DeCAL library. However, many things still don't work. Please see todo.txt.


You can find (the same, or another) port to FPC in
http://svn.freepascal.org/cgi-bin/viewvc.cgi/contrib/decal/?limit_changes=0root=fpcprojects
or
svn co http://svn.freepascal.org/svn/fpcprojects/contrib/decal/

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

Re: [fpc-pascal] char in [range]

[Vincent Snijders]

ik schreef:


Yes :)


OT:
My native language is non latin based, and you write what you hear 
(unlike latin based languages).


Reading http://en.wikipedia.org/wiki/Orthographic_depth, I would expect 
that in Hebrew, one cannot just write what one hears, unlike some (but 
not all) Latin based languages like Italian.


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

Re: [fpc-pascal] (Generic) Container Classes

[Vincent Snijders]

Juha Manninen schreef:


What about the generic containers? I guess it has not been planned yet.


There are some in the fgl unit in the RTL. As far as I can see, they are 
not yet documented.


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