For example I have following code
program teststr;begin writeln('test');end.
Compile it with -a and -Sewn or -Sen
$ fpc -a -Sewn teststr.pas It fails to compile. this is not a bug but it makes
me pulling hair for hours.
The problem is -a options add note which causing -Sewn to stop
@Bart.
I just did try what you proposed (I promise without to read you before) and
come here to announce that if solves the thing.
--> if (fld1 is tblobfield) and (self.fblobintf <> nil) then begin
makes fpc trunk happy!
Well seen Florian, Bart and Micha.
;-)
Now, only msestat-files remain
On Sun, Mar 8, 2020 at 3:59 PM fredvs via fpc-pascal
wrote:
> To resume, the problem comes from "if fld1 is tblobfield".
No, you miss the point:
> if fld1 is tblobfield and (self.fblobintf <> nil) then begin
This will not compile anymore since the operator precedence of IS has
been altered
Le 26.02.20 à 15:11, denisgolovan via fpc-pascal a écrit :
In theory yes, but it's not recommended, because Microsoft does not recommend
it (not to mention that it isn't even remotely tested as much as the normal
Win64 target).
Regards,
Sven
Got it. Thanks for the clarification.
--
> You wrote before the code is:
> if fld1 is tblobfield then
> ?
Yes, it was to isolate the problem.
The original line that generates error is:
---> if fld1 is tblobfield and (self.fblobintf <> nil) then begin
As work-around, removing "fld1 is tblobfield" makes trunk happy:
---> if
Am 08.03.2020 um 15:42 schrieb fredvs via fpc-pascal:
Can point out a link to the whole source code containing this line?
More than welcome!
https://github.com/mse-org/mseide-msegui/blob/master/lib/common/db/msesqlquery.pas
At line 1719:
if fld1 is tblobfield and (self.fblobintf <> nil)
> Can point out a link to the whole source code containing this line?
More than welcome!
https://github.com/mse-org/mseide-msegui/blob/master/lib/common/db/msesqlquery.pas
At line 1719:
if fld1 is tblobfield and (self.fblobintf <> nil) then begin
Fre;D
-
Many thanks ;-)
--
Sent
Am 08.03.2020 um 14:29 schrieb fredvs via fpc-pascal:
Hello.
I did try last fpc trunk and get that error message when compiling a program
(mseide):
---> Error: Operator is not overloaded: "Class Of TBlobField" and "Boolean"
This comes from that line:
---> if fld1 is tblobfield then // here
Hello Michael.
The error comes after commit 4266 of 06-03-2020:
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@44266
Fre;D
-
Many thanks ;-)
--
Sent from: http://free-pascal-general.1045716.n5.nabble.com/
___
fpc-pascal maillist -
> This is a bug, it should be permitted.
Huh, from msegui or from fpc?
Fre;D
-
Many thanks ;-)
--
Sent from: http://free-pascal-general.1045716.n5.nabble.com/
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
On Sun, 8 Mar 2020, fredvs via fpc-pascal wrote:
Hello.
I did try last fpc trunk and get that error message when compiling a program
(mseide):
---> Error: Operator is not overloaded: "Class Of TBlobField" and "Boolean"
This comes from that line:
---> if fld1 is tblobfield then // here
Hello.
I did try last fpc trunk and get that error message when compiling a program
(mseide):
---> Error: Operator is not overloaded: "Class Of TBlobField" and "Boolean"
This comes from that line:
---> if fld1 is tblobfield then // here error.
Do you know what is the new equivalent for:
"if
12 matches
Mail list logo