under the documents (who wouldn't?).
The author, for one :-)
The commenting system puts extra load on the server which I don't want.
Amazon.com has a patent on one click shopping, I believe. I think I know why.
Well, with the FindPart function, back 7 months ago.. I found an error in the
We've looked at the people on the mailing list many times, but we've
never seen people sticking out their neck and actually doing something
along these lines. It takes long-range commitment, which is probably
what scares many people off...
I've volunteered to help, but I think there are too
We've looked at the people on the mailing list many times, but we've
never seen people sticking out their neck and actually doing something
along these lines.
I've looked at people in charge many times, but I've never seen those in charge
sticking their head out telling me directly,
As far as I know, Lars is a FPC fan, and he merely wishes to express concern
about some of the issues he has with FPC
Yes I'm a fan.
It's not just the issues that I alone have with FPC since I'm not even an
embedded programmer
myself. I'm putting myself in their shoes. It isn't just me who is
http://wiki.freepascal.org/packages
PPUMove
ppumove is a standalone binary in the FPC distribution that creates a shared
libs from already compiled units. As far as I can see, this is already the
beginning of a package system, except that it is manual (create packages
manually yourself). This
Hi!
As some know.. CompactSysutils contains many functions for embedded or CGI
programmers to use when they don't wish to use full sysutils unit. i.e. anyone
looking for smaller footprint executable.
I've partly described it here:
Daniel Wrote:
Basically, 2/3 of this unit is duplicated functionality. Interresting
functions I cannot get somewhere else are string and path manipulation
routines like extractfile*, trim*, wraptext.
Yes.. it duplicates functionality because it was a prototype or proof in
concept. I planned
Let's first discuss a plan, then we'll see about the name. Suppose we put =
everything that does something with paths and files in a unit:
* Extractfilepath and friends
* Exec, findfirst, etc.
... then it could be called something like fsutils, fs from filesystem.
So, let's first discuss
I wrote:
In KOL, Kladov also returns a zero with his Str2Int function if string is bad.
You may be thinking.. but what if the string really is a zero and we want to
know that it is?
Well then we can do this:
if (s = '0') or (StrToInt(s) 0) then writeln('S is an integer');
if
I wrote:
for functions that have raise calls like
wraptext/comparetext/strtoint.
Spoke to soon.. it's good news for those functions.
Looks like wraptext/comparetext are standalone anyway, according to what I see
in compactsyutils on my svn.
So mainly its the strtoint strtobool functions that
I wrote:
What about +-+000 and ++-+0 though?
And does StrToInt in the current sysutils check this?
An unhandled exception occurred at $0040A462 :
EConvertError : +-000 is an invalid integer
$0040A462
$0040172F
To answer my own question: that one is invalid according to current sysutils
Rather..
var
i: integer;
begin
i:= StrToInt(s);
if (s = '0') or (i 0) then
writeln('S is an integer, and i is now: ', i)
else
writeln('S is not an integer: ', s);
end;
Alternatively:
function IsInteger(s: string; i: integer);
begin
result:=
Therefore, an exceptionless strtoint is not a drop in replacement, you =
need to recode your error handling. If you do so you can just as well =
replace it by val.
If you first start off using compactsysutils, the error checking will still work
if you upgrade to using sysutils. Therefore it
2.Second example - it does not work.
program NUMBERS (Input,Output);
var A,B : Integer;
begin
Write ('Find greater number.');
Write ('Enter two numbers.');
Read (A,B);
if AB then
Write ('The greater number is',A)
else
Something like this solves your problem
program NUMBERS (Input,Output);
var A,B : Integer;
begin
Write ('Find greater number.');
Write ('Enter two numbers.');
Read (A,B);
if AB then Write ('The greater number is ',A)
else
Write ('The greater number is ',B);
readln;
Did you see my patch:
http://www.freepascal.org/mantis/view.php?id=9961
It is a really easy and quick fix.. just wondered why someone hadn't close off
the bug yet.
___
fpc-devel maillist - fpc-devel@lists.freepascal.org
If you really want to write C plugin, then I can add a unit to the
IDEIntf with some common functions without OOP.
I don't intend to doing that right now.
But one of the most commonly used and supposedly complex and well
defined plugin systems open to 3rd party providers is Steinberg
Hi Lars,
The key point is exporting the api from the executable rather than the dll.
Many
people don't understand this basic concept nor know it is possible, nor
understand why it works and how it works.
I, too, in fact don't understand this. care to give a short explanation
? I do
1) A quick work-around would be to parse all the generated html and
manually insert the link. LUFDoc (help for the PSP or Powtils web
utilities) do this this and is amazingly quick, but it's a bit of a
hack.
Actually I have engineered it modular like this:
fileout(header);
fileout(navbar);
Does a function like this exist:
function FpcTargetDir: string;
begin
result:= {$I %FPCTARGETCPU%}+'-'+{$I %FPCTARGETOS%};
end;
Above works for my needs, just wonder if something already exists in RTL
or if it should be added for convenience.
___
result:= {$I %FPCTARGETCPU%}+'-'+{$I %FPCTARGETOS%};
Above works for my needs, just wonder if something already exists in RTL
or if it should be added for convenience.
It doesn't exists and i don't see a reason why it should be added. The above
line is simple.
The above line:
{$I
Dear fpc developers,
Let me submit a divison bug:
When a floating point constant which fits into single precision is divided
by integer variable, the result is assumed to be a single-precision
number.
program div5;
var five:integer=5;
begin
writeln(1.0/five);
writeln(1.0/five-1/five);
22 matches
Mail list logo