challenge Offical launch of the 1 Billion Row Challenge in Object Pascal

[Arnaud Bouchez 407]

This is a "classical" problem with Delphi, overloaded functions, and floating points values.

 

IMHO using currency is an awful workaround here, and should not be kept in any serious codebase.
It works "by chance".

 

Another workaround, still using the Math unit, is to make the computation in two steps:

function RoundExDouble(x: double): Double;
begin
  x := x * 10;
  Result := Ceil(x) / 10;
end;

function RoundExInteger(x: double): Integer;
begin
  x := x * 10;
  Result := Ceil(x);
end;

So the expected Ceil(double) overload is clearly picked up by the compiler.

 

Or define our own unique Ceil() function, which does not depend on Math.pas and ensure we use the right value type:

function ceil(x: double): integer;
begin
  result := trunc(x) + ord(frac(x) > 0);
end;

This is this solution I used in my entry of the challenge: stay away from Math.pas. 😉

 

Edited March 29 by Arnaud Bouchez

[Rollo62 536]

On 3/12/2024 at 6:46 AM, Gustavo 'Gus' Carreno said:

Hey Cornelius,

 

I was actually considering this one: VSoft.CommandLineParser

That one seems to be a self contained thing without dragging much more.

But also had these in the back burner:

• rcmdline
• FDC.CommandLine.pas
• GpCommandLineParser.pas

But now I need to add that one to my list since I don't have it 😃

Thanks !!

 

Cheers,

Gus

Nice list, thanks 👍

 

You missed these few, probably:

https://rosettacode.org/wiki/Parse_command-line_arguments#Delphi
https://docwiki.embarcadero.com/Libraries/Alexandria/en/System.SysUtils.FindCmdLineSwitch

https://github.com/exilon/QuickLib/blob/d085aa28e5fd65bae766446f5355ec4dc80fae9e/Quick.Commons.pas#L1292

https://wiert.me/2015/05/13/on-the-delphi-tcommandparser-class-for-parsing-command-lines-and-arguments-via-suggestions-for-how-to-define-command-line-parameters-stack-overflow/

https://github.com/jackdp/JPLib/blob/master/Base/JPL.CmdLineParser.pas

https://github.com/tokibito/delphi-argparse

 

 

[Gustavo 'Gus' Carreno 24]

Hey Rollo62.

 

Thank you sooooo very much for extending my list!!!

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

 

I've been busy:

• The automation is now done for both Linux and Windows
• We are back to the previous output hash: 4256d19d3e134d79cc6f160d428a1d859ce961167bd01ca528daca8705163910
• I've altered all the entries that were using an internal version of the rounding functions to use the one from the baseline

Today is Saturday, and now that I have the automation completed, I'll run the full shebang and will update the results table once they are done.

 

Cheers,

Gus

[Arnaud Bouchez 407]

On 3/29/2024 at 11:37 AM, Rollo62 said:

Nice list, thanks 👍

 

And don't forget the command line parser available in mORMot 2.

- Works on all OS;

- Works on Delphi and FPC;

- Can auto-generate the help content with proper formatting;

- Minimal code writing.

 

In practice, resulting code is short and efficient:

https://github.com/synopse/1brc-ObjectPascal/blob/main/entries/abouchez/src/brcmormot.lpr#L446

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

The weekly Saturday results are up.
Get'em while they're hot 😉

 

Cheers,

Gus

Edited March 30 by Gustavo 'Gus' Carreno

[Gustavo 'Gus' Carreno 24]

My dear challenge peeps!!

 

Now that the Blaise Pascal Magazine new edition is out, I can finally talk about this:

• Ian Barker has written an article that mentions our little challenge.

I would provide a link to this new edition if I could. Their site is a bit sub-par, to put it quite politely.

 

Cheers,
Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

 

We have new entries.
We have have a new leader.

Weekly Results have been updated.

 

Cheers,
Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

I was given owner access to https://github.com/1brc after asking to be included on the https://1brc.dev site.
Yeah, I know, owner... Still don't understand why, but it's where we're at, LOL!! 😄
Now I'm in a bit of a pickle: I don't have an icon that will represent Object Pascal.
There's many for Delphi, and many for Lazarus, but none for Object Pascal in general.
Can anyone help me on this?

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

I've put up the GitHub repository for all the Object Pascal logo proposals: https://github.com/gcarreno/UnofficialObjectPascalLogos
Any changes and new proposals will now be accepted via a PR.

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

I've been thinking about adding an alternative results table in order to compare to the original Java specs of only 400 stations and 8 threads.
This means that some of the assumptions for the current state of things would probably be crippling in that case.
What do you guys think of adding a -4 or --400-stations command line switch to your entries?

 

Cheers,

Gus

Edited April 22 by Gustavo 'Gus' Carreno

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

We are moving from the input file having CRLF to having only LF as the line terminator.
Next run, the 27th of April, will be mixed to leave enough time for everyone to make the necessary changes.
The next run after that, the 4th of May, will not be mixed and will expect every entry to have made changes if necessary.
The SHA256 for said input file has already been updated on the README.md file.

 

Cheers,

Gus

[Arnaud Bouchez 407]

Two last weeks of the challenge...

 

Still time to post your own entry!

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

Georges suggested that we may give a helping hand to the entries that haven't yet done the change from CRLF to LF only.
If any of you want to have a stab at it, it would be greatly appreciated!!
And, does anyone know how to contact Lurendrejer Aksen? His entry has been kinda abandoned and I would like to see it working properly, if possible.
Many thanks to my wonderful participants in advance!!

 

Cheers,

Gus

[corneliusdavid 213]

26 minutes ago, Gustavo 'Gus' Carreno said:

the entries that haven't yet done the change from CRLF to LF only.

No need for any changes to my entry--TStreamReader handles both already. And yes, I tested it. 

Edited May 1 by corneliusdavid

[Gustavo 'Gus' Carreno 24]

Hey David,

 

1 minute ago, corneliusdavid said:

No need for any changes to my entry--TStreamReader handles both already. And yes, I tested it. 

 

Awesome sauce !!
Thanks !!

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

We are quickly approaching the deadline for our little challenge.
While the end date is next Friday, I will post the last results after I run the automation on Sat. of Sun.
You can still drop PRs after Friday, but they will only be merged after the automation is done on Sat. or Sun.

 

My intention with this repository is to keep accepting entries for the duration of my life time.
This is the perfect round up of Object Pascal code to demonstrate that it's not dead and can compete with any of the top languages on SO or TIOBE.

 

I'm also thinking about adding the 8 thread/400 Stations table for comparison with the Java side of things.
But I guess that Paweld has made a better attempt here.
More news on this table later.

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

Looks like we have the results of the comparison back and Object Pascal is quicker than Java.

 

Reference: https://github.com/gcarreno/1brc-ObjectPascal/discussions/103#discussioncomment-9359820

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

The end has past.
Things are ready for the last automation run.
I'll post the results first thing after I've had a sleep.
During that sleep, the automation will run.

 

Cheers,

Gus

[Gustavo 'Gus' Carreno 24]

Hey my challenge peeps!!

 

We have finally arrived at the end of the challenge!!
It's been a fun ride, to say the least.
The final results have been posted, with the usual minor ooopss, of course.

 

Like stated before, I'll be accepting entries until I'm no longer in this plane of existence.
A new results table for those entries will be made, and it will include all of the entries, old and new.

 

Eventually, I'll also publish a results table for 400 Stations and 8 threads.
Just need a bit of breathing space to get that done. But it will come.

 

Let's hope this repository, and the effort of the participants, can stand as an example of the power that still resides in Object Pascal.
Let's hope we can all shut up the nay sayers by merely pointing at it.

 

All the best for you all in your future Object Pascal endeavours!!

 

Cheers,

Gus