Thanks.
BTW: "Pestering Peacock" is some Ubuntu related joke? :)
And I thought you where referring to a taller two legged peacock, who was ruffling his feathers at that hackathon... 8)Thanks.
BTW: "Pestering Peacock" is some Ubuntu related joke? :)
Not really. It was about two years ago during a FPC hackathon when it turned out the hotel where we staying had a bunch of peacocks. They were very noisy and annoying.
During that meeting, the plans for 3.0 (and e.g. the unicode implementation of the RTL) were finalized, and sb proposed to call it "Pestering Peacock", and that stuck
And I thought you where referring to a taller two legged peacock, who was ruffling his feathers at that hackathon... 8)erm, why there are beacocks with more legs?
Significant step forward :). Now we need more detailed optional RTTI, anonymous methods and attributes ^^. Bye bye Delphi.
Significant step forward :). Now we need more detailed optional RTTI, anonymous methods and attributes ^^. Bye bye Delphi.
Recently I bought Object Pascal Handbook (by Marco Canto) and plan to use it exclusively with FPC/Lazarus, so wonder if there are some more features besides the ones listed above which are not (yet) supported in FPC?
Not many. Note that there are and always will be some quirks between FPC and Delphi but not anything (as it stands..) that can't be solved both ways by an experienced programmer that is not afraid to read documentation (ok, there's the limiting factor) or sound advice on this forum.
And now for something completely different but on subject and very opinionated:
...
Let me explain I use both Delphi and FPC for a very very long time professionally. (Yes, Both)
Not really. It was about two years ago during a FPC hackathon when it turned out the hotel where we staying had a bunch of peacocks. They were very noisy and annoying. ... and sb proposed to call it "Pestering Peacock", and that stuckI envision something like "FPC 3.1.0 'Ice Beer' has been released" :)
I envision something like "FPC 3.1.0 'Ice Beer' has been released" :)
Personally, I really liked pascal community (fpc, lazarus, mseide ... and so on) staying away from giving fancy names to their releases.
I don't really understand this new modern trend of giving meaningless names to releases.
varies between copy con program.pp program XXX;begin end.crtl-z , fp, Notepad, D7, D2007 XE2 and Lazarus.
Honest. Very Honest. Depends.
Nope. It's - server side - Debian based linuxes atm.
That's interesting in a sense you have not jumped to the latest called 'Go lang'. ;)
Btw what is social? :o
Speaking of social! marcov congratulations on 4000th post!Btw what is social? :o
A word that is nowadays a higher score on buzzword bingo.
Speaking of social! marcov congratulations on 4000th post!
FPC 3.0.0
****************************************************************************
* Features
****************************************************************************
- can call external C code
- can call external C code
Is it new feature of FPC 3.0.0 ?
- can call external C code
Is it new feature of FPC 3.0.0 ?
No, just like Borland Pascal (and Delphi) compatiiblity a few lines higher isn't new either. IOW that is general description of the project, not whatsnew
[1] http://www.freepascal.org/future.varPlanned for later versions
Linking with C++ code
Makefile:2872: *** The only supported starting compiler version is 3.0.0. You are trying to build with 2.6.2.. Stop.
Now I tried to updateThe golden rule since a long time ago (but more forced when that Makefile message is introduced) is: previous latest/current stable is the only one supported to build current stable, current stable is the only one supported to build trunk.QuoteMakefile:2872: *** The only supported starting compiler version is 3.0.0. You are trying to build with 2.6.2.. Stop.
Awesome
So you can only can get 3.x, if you already have 3.0 >:D
So you can only can get 3.x, if you already have 3.0 >:D
BTW: the latest fpcup builds you an intermediate 3.0.0 compiler from 2.6.2 to bootstrap trunk.
program detgpbte;
{
1: 260
2: 64
3:
}
uses
typ,
iom,
det;
const
pmin = -10;
pmax = 100;
var
l, i, ind, rw, n, k, term, p, vb, nvb: ArbInt;
f: ArbFloat;
a: array[pmin..pmax] of ArbFloat;
begin
iom.npos := 1000; {max. width of output to 1000, since this is piped}
Assign(input, ParamStr(1));
reset(input);
Assign(output, ParamStr(2));
rewrite(output);
Write(' program results detgpbte');
case sizeof(ArbFloat) of
4: writeln('(single)');
6: writeln('(real)');
8: writeln('(double)');
10: writeln('(extended)');
end;
Read(nvb);
writeln;
writeln(' number of examples:', nvb: 3);
for vb := 1 to nvb do
begin
writeln;
writeln('example', vb: 2);
Read(p, n, l);
ind := p;
writeln;
writeln(' n=', n: 1, ' l=', l: 1);
for i := 1 to n do
begin
if i <= l then
rw := i
else
rw := l + 1;
iomrev(input, a[ind], rw);
Inc(ind, rw);
end;
detgpb(n, l, a[p], f, k, term);
ind := p;
writeln;
writeln(' A (left-under) =');
for i := 1 to n do
begin
if i <= l then
rw := i
else
rw := l + 1;
if i > l + 1 then
Write('': (i - l - 1) * (numdig + 2));
iomwrv(output, a[ind], rw, numdig);
Inc(ind, rw);
end;
writeln;
writeln('term=', term: 2);
writeln;
if term = 3 then
writeln(' wrong input')
else
if term = 2 then
writeln(' matrix not pos-def.')
else
begin
Write(' determinant of A =', f: numdig);
{ if k <> 0 then } Write(' * 8**', k: 3);
writeln;
end; {term=1}
writeln('---------------------------------------------');
end; {vb}
Close(input);
Close(output);
end.
program detgpbte;
{
1: 260
2: 64
3:
}
uses
typ,
iom,
det;
const
pmin = -10;
pmax = 100;
var
l, i, ind, rw, n, k, term, p, vb, nvb: ArbInt;
f: ArbFloat;
a: array[pmin..pmax] of ArbFloat;
begin
iom.npos := 1000; {max. width of output to 1000, since this is piped}
Assign(input, ParamStr(1));
reset(input);
Assign(output, ParamStr(2));
rewrite(output);
Write(' program results detgpbte');
case sizeof(ArbFloat) of
4: writeln('(single)');
6: writeln('(real)');
8: writeln('(double)');
10: writeln('(extended)');
end;
Read(nvb);
writeln;
writeln(' number of examples:', nvb: 3);
for vb := 1 to nvb do
begin
writeln;
writeln('example', vb: 2);
Read(p, n, l);
ind := p;
writeln;
writeln(' n=', n: 1, ' l=', l: 1);
for i := 1 to n do
begin
if i <= l then
rw := i
else
rw := l + 1;
iomrev(input, a[ind], rw);
Inc(ind, rw);
end;
detgpb(n, l, a[p], f, k, term);
ind := p;
writeln;
writeln(' A (left-under) =');
for i := 1 to n do
begin
if i <= l then
rw := i
else
rw := l + 1;
if i > l + 1 then
Write('': (i - l - 1) * (numdig + 2));
iomwrv(output, a[ind], rw, numdig);
Inc(ind, rw);
end;
writeln;
writeln('term=', term: 2);
writeln;
if term = 3 then
writeln(' wrong input')
else
if term = 2 then
writeln(' matrix not pos-def.')
else
begin
Write(' determinant of A =', f: numdig);
{ if k <> 0 then } Write(' * 8**', k: 3);
writeln;
end; {term=1}
writeln('---------------------------------------------');
end; {vb}
Close(input);
Close(output);
end.
Thank for your job and forwarding good doing.
Only want to notice a little disappointment, when download a new FPC version and try to install: even if I choose Minimum installation - installer ask me about the path to Android NDK files. Not good if I'm not in plan to write for Android , at least this time. So I have to download Android NDK - 736MB files, that is not simple with my pure internet connection. Also if connection will broken - I'll try again and again until success. Be good to provide download all needed (especially big) things through torrent if possible. And of cause I would be some more glad if Minimum installation of FPC don't need Android NDK (but think if it is - there was no another way).
my oldest fpc available is 2.0, and it shows the same...
Can someone please indicate what needs to be done to get this FreePascal compiler to run under AIX?
Please, for the love of Christmas, drop the goofy Ubuntu style cutsy name.
No problem with Ubuntu style name for me. Continue with 3.0.2, please :PPlease, for the love of Christmas, drop the goofy Ubuntu style cutsy name.
It is actually a pun on those names. We were discussing if the next major release would be 2.8 or 3.0 at a conference center where was a peacock on grounds making a lot of noise :-)
Don't worry, as far as I know it is a one time joke. I haven't heard anyone suggesting a new name for 3.0.2.
No problem with Ubuntu style name for me. Continue with 3.0.2, please :P
I smell a contest.....
Submission: "Wandering Willow"
I see a 3.0.2 RC1 in svn. Is that already the official RC1?
I only hope new version will not be released with such (http://bugs.freepascal.org/view.php?id=27349) bug.
Just do not use nested typesBug of nested types - just do not use it.
Just do not use whatever incomplete features you can't bear of its drawback for now. Feel free to use nested types & generics, despite they choke codetools and the debugger. I use generics, seldomly nested type as well because they still make my code simpler, while I still can use old style debugging when needed.QuoteJust do not use nested typesBug of nested types - just do not use it.
Bug of generics - just do not use it.
Bug of anything - just do not use it.
It's fine. I like it. Hello, Delphi 7!
type cTestClass = class
function GetValue (Idx : integer) : string; overload; virtual; abstract;
function GetValue (Key : string) : string; overload; virtual; abstract;
property Value [Idx : integer] : string read GetValue; {$IFNDEF FPC }default;{$ENDIF}
property Value [Key : string] : string read GetValue; {$IFNDEF FPC }default;{$ENDIF}
end;