From:"Matthews" <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Sujbect: [fpc-pascal] Weird DosError values
Date sent: Mon, 16 Feb 2004 18:06:13 -0500
Hello Lukas
> I'm using a function and a procedure, both which deal
> with finding files in
> the same directory, and then eith
From: "Matt Henley" <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Subject:[fpc-pascal]Error Making CVS version of compiler
Date sent: Tue, 17 Feb 2004 20:06:49 -0600
.
.
> /usr/local/bin/ppc386 -Ur -Xs -OG2p3 -n -Fi../inc
> -Fi../i386 -Fi../unix
> -Fii386 -FE. -di386 -dRELEASE ../
Hi,
I'm interested in freepascal for ARM, I have downloaded the last
snapshot (cvs) of freepascal and I've tried to compile
with a fatal internal error,
"typinfo.pp(443,6) Fatal: Internal error 200308241"
My host is a linux and i386, the above error is making a cross compiler
with target ARM.
I am trying to compile this which is giving me hell
unit MyError;
{
Custom error reporting routines.
*** WINDOWS VERSION ***
}
interface
procedure Say(msg : String);
procedure SockError(msg : String);
procedure SockSay(msg : String);
procedure GenError(msg : String);implementation
us
Since Free Pascal supports function overloading,
you could do something like this:
Function CheckPoint(X, Y:real): Boolean;
Begin
{Does something here..}
end;
Function CheckPoint(aPoint: tMyRec): Boolean;
Begin
Result:=CheckPoint(aPoint.X, aPoint.Y);
end;
// So you can use it either way:
On Wed, 18 Feb 2004, Crabtree, Chad wrote:
> I am trying to compile this which is giving me hell
>
> unit MyError;
>
> {
> Custom error reporting routines.
>
> *** WINDOWS VERSION ***
> }
>
> interface
>
> procedure Say(msg : String);
> procedure SockError(msg : String);
> procedure SockS
Dear Tomas,
Thanks for your advice.
My apologies for not providing enough information - I realized after I sent
the message that I should have mentioned what OS, etc. I was running.
I'm running Win 2000, and using sysutils, and dos - could that be the problem?
The target os (as given to my by
> Thanks for your advice.
>
> My apologies for not providing enough information - I realized after I sent
> the message that I should have mentioned what OS, etc. I was running.
>
> I'm running Win 2000, and using sysutils, and dos - could that be the problem?
>
> The target os (as given to my
Greetings.
I am new to Pascal, and FPC. I am curious how I can learn more about
using TDatabase and TDataset in conjunction with MySQL, if that's even
possible. I have only seen references to these classes and am not
certian what they accomplish, or their interface, only that they are
used for dat
Greetings.
I have a object that connects to a speech server, festival. In my
object, I define a function called close. This must close the socket
connection, which is done by the function close. Therefore, I am having
a problem, because simply calling close with the sin and sout parameters
results
You can also define a function that returns the record you need:
function NewMyRec( X, Y : double ) : TMyRec;
begin
NewMyRec.x := X;
NewMyRec.y := Y;
end;
I think it's really better than declare a new variable and initialize it
by the code.
if CheckPoint(NewMyRec(1.2, 2.2)) then ...
Be well
If the function you wish to call is apart of another unit you can call
i.g.:
UnitName.Close(sin);
UnitName.Close(sout);
** That may work from within the same unit but I'm not certain. **
Free pascal is great about name spaces and allowing you to specify which
function you wish to call.
On
^_^ Thats how its working at the moment and I've known that FPC doesn't
do that kinda definition on the fly. My real question was why not?
On Wed, 2004-02-18 at 21:34, Adam Victor Nazareth Brandizzi wrote:
> You can also define a function that returns the record you need:
>
> function NewMyRec(
Marco:
I'm using 1k blocks.
-Lukas
At 04:29 PM 2/18/2004, you wrote:
How large is your buffer? Do you try to read 2/4/8k blocks ?
___
fpc-pascal maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
> procedure TFestival.Close();
> begin
> close(sin);
> close(sout);
>
> Close := 0;
> end;
>
> I realize that I can simply rename my close procedure but I imagine that
> I will run into similar situations as I continue to use Free Pascal.
Use explicit namespacing: System.Close(sin)
Hallo,
i know this is not exactly question to this maillist but
maybe somebody could help me how can i convert only the following
definition of "reg_drq_block_call_back" into FPC Pascal notation:
void ( * reg_drq_block_call_back ) ( struct REG_CMD_INFO * );
where definition is
struct REG_CMD_IN
> Hallo,
>
> i know this is not exactly question to this maillist but
> maybe somebody could help me how can i convert only the following
> definition of "reg_drq_block_call_back" into FPC Pascal notation:
>
> void ( * reg_drq_block_call_back ) ( struct REG_CMD_INFO * );
>
> where definition is
>
>
17 matches
Mail list logo
