(Personally): AWESOME!
This is something that was discussed on the FPC-Pascal ML but it died.
I am able to build installation bundles for SPARC running Linux (Debian) and
Solaris (OpenSXCE). The fp IDE works but doesn't have libgdb support, and I've
got limited time to struggle up the learning
Just a friendly suggestion… You are close to how I did it in Modern Pascal:
procedure Test;
begin
EnterProfiling('MyUnit.Test');
try
// <<< real code here
finally
LeaveProfiling('MyUnit.Test');
end;
end;
In my profiler, I do not need a string for the Leaving Profiling, I use
I like the concept, I would like to ask that we do not support INTEGER as a
type, and be more specific by limiting to SHORTINT, SMALLINT, LONGINT,
INT64. That way code snippets are not confusing when you implement 16bit
INT logic on a 32bit INT environment. Because I do a lot of documentation
for
quot; I am still spending all my spare time to get MPC's
tutorial site up to par with FPC - as I promote MPC as FPC's Script Engine.
On Tue, Dec 26, 2017 at 8:50 AM, Ozz Nixon <ozzni...@gmail.com> wrote:
> I like the concept, I would like to ask that we do not support INTEGER as
&g
{$MACRO ON}
{$DEFINE _CTASSERT(X,Y,Z):=assert(x=y,z);}
Begin
_CTASSERT(1,1,'Constant failed.');
end.
___
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
I am trying to access a file written to disk with 2 Singles (4 bytes each,
8 bytes total).
Linux: hexdump -Cv database.dat
00 00 00 81 00 00 00 81
The value saved in C, is 1 for both fields (low record #) and (high record
#).
In Pascal, if I do the same write using Longint, I get:
01 00 00 00
I have to ask why?
i is Int64 only, will always be int64 only, so all other comparisons are always
skipped.
I could see this, inside a method with an untyped parameter:
procedure doSomething(myvar;out success:boolean);
Begin
{… your if is comparisons …}
end;
This opens your method to be
gt;
>> -Original Message-
>> From: fpc-devel <fpc-devel-boun...@lists.freepascal.org> On Behalf
>> Of Ozz Nixon
>> Sent: Saturday, 14 April 2018 22:13
>> To: FPC developers' list <fpc-devel@lists.freepascal.org>
>> Subject: *** GMX Sp
to that type.
>
> For ordinals, it compares the value against the specified type. Effectively
> telling you if you can do a hard cast of that value to that type.
>
> I fail to see the difference?
>
>> -Original Message-
>> From: fpc-devel <fpc-devel-boun...@l
Actually (for clarity) JavaScript does allow multi-initialization, however,
does not require type:
var a=0,b=0,c=0; // all are zero
// and if your presetting to zero due to Pascal not pre-initializing
variables, javascript does, so:
var a,b,c; // all are zero
var a=b=c=1; // C and most
As an extension, it makes sense - but I would make it a forced command line
switch and obscure $modeswitch. So the code can easily be ported to other
pascal compilers, or versions of FPC down the road. I spend 8 to 12 hours a
day porting Delphi (versions) of code to FPC. And the XE series really
Pre pre-initialization, I do it as a compile option:
Modern Pascal v2.0.0 (LINUX,CPU64,X86_64,LITTLEENDIAN,1180323)
Copyright (c) 2000..2017 by Ozz Nixon (Modern Pascal
Solutions, LLC).
■ Produces Cross-Platform 32bit/64bit Encrypted Binaries.
/usr/bin/mp2 [options] sourcefile
Going through the system unit, and I noticed this syntax (not verbatim!)
Procedure Cmd_Line:PChar;
property CmdLine read Cmd_Line;
* Debating about support this, but, no idea what this would be called, a
property outside of a class, to a global proc.
Thanks!
Ozz
, February 25, 2018 3:17 AM
To: FPC developers' list <fpc-devel@lists.freepascal.org>
Cc: Sven Barth <pascaldra...@googlemail.com>
Subject: Re: [fpc-devel] MACRO - correct syntax?
Am 25.02.2018 03:01 schrieb "Ozz Nixon" <ozzni...@gmail.com
<mailto:ozzni...@gmail.com
wrote:
> Ozz Nixon schrieb am So., 30. Sep. 2018, 17:18:
>
>> A few years ago I acquired IP rights to Halcyon (xBase for Delphi/FPC).
>> For years, I have not had an issue, today, I am recompiling the suite (zero
>> code changes) - 3.0.4 Linux - no problems, 3.0.4 Mac -
* Not arguing, but... *
Linked List faster than Array?
Unless I missed what you are talking about... I always teach programmers:
Array is the fastest collection to use, followed by Linked List, followed
by bTree, etc.
* Sorry for off topic - just that grabbed my "What did he just say?"
SORRY - JUST RE-READ... that is what you are saying... it's late here ;-(
On Sat, Oct 27, 2018 at 8:22 PM Ozz Nixon wrote:
> * Not arguing, but... *
>
> Linked List faster than Array?
> Unless I missed what you are talking about... I always teach programmers:
>
> Array is the
I have these last couple of lines to port to FPC -Mdelphi, but everything I
try fails...
Asm
MOV PreviousUnitAddressOffset,
TUnitHeader.PreviousUnitAddress
MOV PreviousLibraryUnitAddressOffset,
TUnitHeader.PreviousLibraryUnitAddress
MOV AncestorTypeDefinitionOffset,
they are constants - I will have to dig back through
the code. (It's from 1995, written by Anders Hejlsberg, so it does a lot of
odd ASM things).
Ozz
On Tue, Nov 13, 2018 at 1:31 PM Ralf Quint wrote:
> On 11/12/2018 7:37 AM, Ozz Nixon wrote:
>
> I have these last couple of lines to port to FPC
Its part of 30+ units. In the main units Initialization...
On Mon, Nov 12, 2018 at 6:03 PM Ozz Nixon wrote:
> Its from D7... and does compile.
>
> On Mon, Nov 12, 2018 at 5:59 PM Marco van de Voort <
> c...@pascalprogramming.org> wrote:
>
>>
>> Op 11/12/
Its from D7... and does compile.
On Mon, Nov 12, 2018 at 5:59 PM Marco van de Voort <
c...@pascalprogramming.org> wrote:
>
> Op 11/12/2018 om 4:37 PM schreef Ozz Nixon:
>
> I have these last couple of lines to port to FPC -Mdelphi, but everything
> I try fails...
>
>
). If it was
for the fact I maintain Halcyon (xBase) code I would slap this all in a DB
server. Which also means my port of Accuracer (aidaim.com) is also going to
have similar problems. :-(
On Wed, Oct 3, 2018 at 3:29 AM Florian Klämpfl
wrote:
> Am 03.10.2018 um 02:28 schrieb Ozz Nixon:
> > Also,
Got it, thanks!
On Tue, Oct 2, 2018 at 7:57 AM Denis Kozlov wrote:
> PChar is a typed pointer, so you need to point it to the memory location
> of TmpBugStr using the "@" operator, like so:
>
> const
>TempString : PChar = @TmpBugStr;
>
>
> On 01/10/201
WIN64
making all these changes to primitive types?
On Mon, Oct 1, 2018 at 1:45 AM Sven Barth
wrote:
> Ozz Nixon schrieb am So., 30. Sep. 2018, 19:17:
>
>> So, should I re-code everything to Double where possible? And Comp at
>> Int64 no problem, that is how my Turbo Pascal build
If I type Cast TmpBugStr as PChar, then the error gets weird:
Error: Incompatible types: got "SYSTEM.PChar" expected "SYSTEM.PChar"
On Mon, Oct 1, 2018 at 8:20 AM Ozz Nixon wrote:
> See Below - pressed enter too fast:
>
>
> On Mon, Oct 1, 2018 at 8:1
Type
Line:Array[0..127] of Char;
Var
TmpBugStr:Line;
{later in the code}
Const
TempString : PChar = TmpBugStr;
___
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
See Below - pressed enter too fast:
On Mon, Oct 1, 2018 at 8:18 AM Ozz Nixon wrote:
> Type
>Line:Array[0..127] of Char;
>
> Var
>TmpBugStr:Line;
>
> {later in the code}
> Const
>TempString : PChar = TmpBugStr;
>
>
Error: Incompatible types: got
A few years ago I acquired IP rights to Halcyon (xBase for Delphi/FPC). For
years, I have not had an issue, today, I am recompiling the suite (zero
code changes) - 3.0.4 Linux - no problems, 3.0.4 Mac - no problems.
However, 3.0.4 Windows - I am getting:
Halcyon6SQL.pas(1407,41) Error: Can't
Could one of you answer:
http://forum.lazarus.freepascal.org/index.php/topic,42623.0.html
Thanks.
O.
___
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel
Yeah, I can see what you mean. I was just thinking how much better it would
be for FPC to start leading the way in the socket world, instead of it has
the tools and no one really knows about it, or how to use them.
If you have ideas Michael on how you and I can help on this area, I am
interested!
I am glad to hear this... last night, I actually came across my last
release of DXSock Server Development Suite source. Is it possible for me to
donate my source to the FPC and Lazarus project with two stipulations?
1. Naming of the Code stays the same (c) and author... and the source
cannot be
I would assume Mean of First,Middle,Last relative to how Binary Searches
Work, Test zero, Test end, Start Middle - some Binary Search Strictly Start
Middle and Work to Start or End. So maybe the wording MEAN is wrong - but,
I am sure they are pointing how to high speed of Binary Searches. I used
Agreed. My socket suite *has* to support 0.9.8, due to one of my larger
customers who cannot upgrade their system (would take them down for weeks).
The programs are air-gapped, so they do not worry about outside hackers.
But for security reasons - they must move date from machine to machine
* Just to note there is a choice - not pitching one is better just, there
is someone doing it *
There is a choice of course... built using FPC. I wrote ModernPascal. We do
not focus on Windows support as much as other platforms FPC is available
for. Per grammar, MP2 (current build) was designed to
alf, I did not realize you were saying "it's an LD issue" ;-)
On Sun, Feb 3, 2019 at 8:05 AM Florian Klämpfl
wrote:
> Am 03.02.19 um 11:09 schrieb Tomas Hajny:
> > On Sun, February 3, 2019 08:40, Ozz Nixon wrote:
> >
> >
> > Hi Ozz,
> >
> > .
>
, stopping
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode
On Sun, Feb 3, 2019 at 2:22 AM Ozz Nixon wrote:
> NOPE - FPC is the compiler for my Interpreter
>
> On Sun, Feb 3, 2019 at 2:13 AM Ralf Quint wrote:
>
>> On 2/2/2019 11:11 PM, Ozz Ni
I am trying to do a fresh rebuild on a Centos 6.8 box - so I copied Modern
Pascal over, installed 3.0.4.1 from freemirror... and I get:
Linking modernpascal_v2
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
/usr/bin/ld: BFD version 2.20.51.0.2-5.44.el6 20100205
NOPE - FPC is the compiler for my Interpreter
On Sun, Feb 3, 2019 at 2:13 AM Ralf Quint wrote:
> On 2/2/2019 11:11 PM, Ozz Nixon wrote:
>
> I am trying to do a fresh rebuild on a Centos 6.8 box - so I copied Modern
> Pascal over, installed 3.0.4.1 from freemirror... and I get:
in func GetOSRelDate:Longint
What is S used for???
S: AnsiString;
Begin
s:='ab';
SetLength(S,50);
{never used}
Next, 3 functions what is the benefit of having the exit instruction:
exit;
end;
end; {end of func definition}
ld is complaining it cannot -ldl
I have read on reddit, this is a glibc update... is that all I need to yum
so FPC can compile my project?
If I copy the binary from my old CentOS is runs. Just cannot recompile...
and I assume this is because I use dynlib?
Ozz
in business at least. And I can try installing 3.x again and
try things if needed
On Sun, Jul 28, 2019 at 2:24 PM Jonas Maebe wrote:
> On 28/07/2019 21:02, Ozz Nixon wrote:
> > Arg, did that (Thank you for the suggestion) and now I am back to:
> >
> > /usr/bin/ld: warning: lin
OS. :-(
On Sun, Jul 28, 2019 at 5:40 AM Jonas Maebe wrote:
> On 28/07/2019 04:08, Ozz Nixon wrote:
> > ld is complaining it cannot -ldl
> >
> > I have read on reddit, this is a glibc update... is that all I need to
> > yum so FPC can compile my project?
>
> You hav
ess is it works on linux/mac purely by luck. but i could be wrong.
>
> --
> Alexander Grotewohl
> http://dcclost.com
>
> On Sep 28, 2019 3:21 PM, Ozz Nixon wrote:
>
> [image: image.png]
>
> When I evaluate the code - it is perfect. However, when I run the code, it
&
It's a CDECL thing... :-(
Disabled Using_CDECL, and now the pointer passes to/from the imported
functions. (Florian/Jonas/Michael - is this an expected issue on Windows?)
On Sat, Sep 28, 2019 at 3:24 PM Ozz Nixon wrote:
> Alexander, Its the calling line that is messing
compile via CLI).
O.
On Sat, Sep 28, 2019 at 2:21 PM Ozz Nixon wrote:
> [image: image.png]
>
> When I evaluate the code - it is perfect. However, when I run the code, it
> raises a SIGSEGV - Segmentation fault. Yet, the code runs perfectly on
> Linux 64bit machine
of my head but does the ord() bit segfault without
> assigning it to anything? like if the function only had writleln(ord())! or
> does the result:= section segfault using ord() without the pointers?
>
> my guess is it works on linux/mac purely by luck. but i could be wrong.
>
> --
> Al
uce this stray C:>d prompt with a Halt(0).
On Sat, Sep 28, 2019 at 6:35 PM Sven Barth via fpc-devel <
fpc-devel@lists.freepascal.org> wrote:
> Ozz Nixon schrieb am Sa., 28. Sep. 2019, 22:53:
>
>> It's a CDECL thing... :-(
>>
>> Disabled Using_CDECL, and now the
[image: image.png]
When I evaluate the code - it is perfect. However, when I run the code, it
raises a SIGSEGV - Segmentation fault. Yet, the code runs perfectly on
Linux 64bit machine, and Mac 32bit.
___
fpc-devel maillist -
. CentOS 7, dropped using init.d for systemctl - on my CentOS 6 machine,
it works perfectly...
8... does socket.pp get affected at RUN-TIME, by environment variables?
(did not notice my first pass through)...
On Wed, Jan 29, 2020 at 8:43 AM wrote:
> On 1/29/20 8:54 AM, Ozz Nixon via fpc-devel wr
via fpc-devel <
fpc-devel@lists.freepascal.org> wrote:
> Hi!
>
> 29.01.2020 18:07, Ozz Nixon via fpc-devel:
> > 1. My code does not directly interact with any environment variables.
>
> Ok.
>
> > ExecStart=/usr/local/bin/coderunner2
>
> I'd suggest, as a qu
I am not sure how this is occurring, however, my socket daemon on Linux -
is launched by hand ./program is able to send to the socket:
Socket.Write(#218+#196+#191);
And the terminal (any) will display the single highbit characters.
If systemctl start myprogram... that same call sends '???'.
rg> wrote:
>
> Op 29/01/2020 om 16:07 schreef Ozz Nixon via fpc-devel:
>
> 1. My code does not directly interact with any environment variables.
>
> Unit cwstring and clocale might do on startup. This might influence e.g.
> widestring/unicodestring<-> ansistring conversi
hanks,
Ozz
On Wed, Jan 29, 2020 at 7:39 AM Marco van de Voort <
c...@pascalprogramming.org> wrote:
>
> Op 29/01/2020 om 14:23 schreef Ozz Nixon via fpc-devel:
>
> I am not sure how this is occurring, however, my socket daemon on Linux -
> is launched by hand ./progra
t.txt
export LC_ALL=C
/usr/local/bin/coderunner2
Nothing writes to the file when systemctl starts it. However, if I
./coderunner2.sh I get:
Starting
LANG=en_US
LOCALE=
So, I guess try FPC 3.0.x???
On Wed, Jan 29, 2020 at 9:42 AM Nikolai Zhubr via fpc-devel <
fpc-devel@lists.freepascal.org> wrote
I have waited this long now :-)
I only run 2.6.4 as something I developed didn't work correctly when
compiled with 3.0.0, 3.0.2...
Ozz
On Wed, Jan 29, 2020 at 10:11 AM Sven Barth via fpc-devel <
fpc-devel@lists.freepascal.org> wrote:
> Ozz Nixon via fpc-devel schrieb am Mi.,
> 2
be a good day :-)
On Wed, Jan 29, 2020 at 11:28 AM Nikolai Zhubr via fpc-devel <
fpc-devel@lists.freepascal.org> wrote:
> Hi!
>
> 29.01.2020 19:04, Ozz Nixon via fpc-devel:
> > cat /etc/test.txt
> >
> > ls -alrt /etc/test.txt
> > -rw-r--r-- 1 root root 0 J
Just make your own descendent - jeez.
On Wed, Jan 1, 2020 at 5:02 PM Werner Pamler
wrote:
> Am 01.01.2020 um 17:01 schrieb Ondrej Pokorny:
> > Isn't the TStrings.WriteBOM property good enough? Why to have yet
> > another not-very-useful overload?
>
> To be honest I think Bart's idea of making
Anyone ever experience making a console app (cross-platform), but, on
windows when the app finishes, it appears to have put an uppercase C or D
in the keyboard buffer, so the Prompt now has C:\>D ???
Every time I run my app, be it show help screen and end, or actually
execute - when it finishes
--
> *From:* fpc-devel on behalf of
> Ozz Nixon via fpc-devel
> *Sent:* Saturday, April 25, 2020 8:21:13 PM
> *To:* FPC developers' list
> *Cc:* Ozz Nixon
> *Subject:* [fpc-devel] Windows Console App
>
> Anyone ever experience making a console app (cross-platform), b
,
>
> I would like to know how you did that since it was exactly what I was
> searchomg for a while ago...
>
> Could you send me a piece of code?
>
> Greetings
>
> Gerhard
>
>
> - Original Message -
> From: Ozz Nixon via fpc-devel
> To: FPC developers
t; No, my question was: how did you put the "D" in the keyboard buffer? I
> would
> like to put out the next command
>
>
> ----- Original Message -
> From: Ozz Nixon
> To: Gerhard Scholz
> Cc: FPC developers' list
> Sent: Sunday, April 26, 2020 8:31 AM
> Subject:
Then, I would suggest it gets bolted into strutils, or sysutils. There are
many good reasons to optimize Setlength(), especially for script authors :-)
Currently, I am working (learning) Alpha Controls (alphaskins), and trying
to find a fit into FCL/LCL, or Graeme's GUI. And if I tweak too much,
Probably not your issue - but, if you have Avasta Anti-Virus - it can
foobar Lazarus and Delphi console apps - where the Console is showing, but
you cannot find it. Not on Taskbar, not in TaskList, etc. If you put an
exclusion on your binary folder, then it works. Took me about 2 days to
figure
As some of you who know me, know I wrote all kinds of interpreter and
pcode compilers. Last night I decided to compile my latest engine in
delphi. I ran a script that does over 18 million double = double + 0.5
Fpc build takes 1m 26.8s
Delphi takes over 15min... I have up and walked away, when I
Ok, I'll check it out. Thanks guys, did not realize it was a pointer, too
many years writing scripts instead of code. Thanks!!
On Thu, Jan 6, 2022, 11:51 PM Michael Van Canneyt
wrote:
>
>
> On Thu, 6 Jan 2022, Ozz Nixon via fpc-devel wrote:
>
> > Procedure Make_Language_File(
Just incase someone needs to know: (public release, not a custom build).
Free Pascal Compiler version 3.0.4 [2017/10/06] for i386
Copyright (c) 1993-2017 by Florian Klaempfl and others
C:\FPC\3.0.4\bin\i386-Win32\fpc.exe [options] [options]
On Thu, Jan 6, 2022 at 6:50 PM Ozz Nixon wrote
:=SecurityLevel;
L.Flags:=Flags;
Inc(FileSize,6);
Writeln('Language_File size is ',FileSize);
SetLength(L.Description,0);
SetLength(L.MenuPath,0);
SetLength(L.TextPath,0);
SetLength(L.QuestPath,0);
End;
Begin
Make_Language_File('English (c) 2022 by Ozz
Nixon','%ROOTPATH%\MENUS
67 matches
Mail list logo