NewPascal 1.9 cannot compile mORMot programs

JD · 2018-05-06 23:37:45

Hi there everyone,

I want to thank everyone that has made mORMot a wonderful framework for Delphi/Lazarus development. I've been using NewPascal 1.7 to develop a mORMot server for my Lazarus based clients.

Today I just used fpcupdeluxe to update my old NewPascal (with Lazarus IDE version I.7) to NewPascal (with Lazarus IDE version 1.9) and when I tried to recompile my program, I got the following error on line 724 in mORMotWrappers.pas

mORMotWrappers.pas(724,75) Error: Incompatible type for arg no. 2: Got "Variant", expected "TFileName"

I can no longer compile anything in mORMot because of this error. Even compiling the example programs fails.

Can anyone please help me get around this problem?

Cheers,

JD

Last edited by JD (2018-05-07 01:25:45)

AOG · 2018-05-07 06:30:49

NewPascal got updated few hours ago.
I just did an install (NewPascal + mORMot) through GIT (with fpcupdeluxe) and all works out of the box.

JD · 2018-05-07 06:53:19

Hi there Don Alfredo. I have an older version of mORMot on my system. Does this mean I have to update mORMot too?

hnb · 2018-05-07 06:57:47

Probably good idea You can do update in 2 ways :

1. http://newpascal.org/download.html / https://github.com/newpascal/newpascal/ … np-v1.0.55
2. via fpcupdelux

JD · 2018-05-07 07:06:32

Hi there Maciej. Is mORMot integrated into NewPascal or can I continue to update mORMot using its regular download link?

If mORMot is in NewPascal, in what directory can i find it?

Thanks,

JD

Last edited by JD (2018-05-07 07:07:28)

hnb · 2018-05-07 07:26:26

If you decide to use option 1 then mORMot is ready to use as part of newpascal.zip archive (is located in ccr\mORMot directory) and is detected "out of box" in IDE (you even don't need to configure a project).
If you decide to use option 2 then you need additional step: you can download mORMot via fpcupdelux or you can do download on your own (for example from : https://github.com/synopse/mORMot )

mpv · 2018-05-07 07:29:20

Can you please post here a mORMotWrappers.pas line 724 content from your version?

Last edited by mpv (2018-05-07 07:29:47)

AOG · 2018-05-07 08:58:06

Source: mORMot latest from GitHub.
Compiles with FPC trunk and NewPascal trunk.

FillDescriptionFromSource(fDescriptions,format('%s%s.pas',[fSourcePath[i], aUnitName]));

JD · 2018-05-07 09:25:00

Ah! that is the problem. My mORMotWrappers.pas line 724 is different from what AOG posted.

Mine looks like this:

    FillDescriptionFromSource(fDescriptions,fSourcePath[i]+unitName+'.pas');

In addition, my project refers to mORMot stored in its own directory somewhere where it can be shared between NewPascal, Lazarus & Delphi.

So I guess the way forward would be to remove this external references/configuration and rely solely on the preconfigured NewPascal version (at least for future NewPascal projects).

JD

Last edited by JD (2018-05-07 09:26:07)

JD · 2018-05-07 10:07:35

Hi all,

I'm going with NewPascal option 2 for the moment.

a) I used fpcupdeluxe to download and build NewPascal (07/05/2018)
b) I got a new version of mORMot from GitHub (07/05/2018)
c) I set everything up and compiled TestSQL3 successfully
d) I now went back to my project and tried to recompile it

I got the following error message in SynDBZeos.pas:

SynDBZeos.pas(1248,14) Error: identifier idents no member "ColumnsToJSON"

The line with the problem is as follows:

  {$if defined(ZEOS73UP) and defined(USE_SYNCOMMONS)}
  fResultSet.ColumnsToJSON(WR);
  {$ELSE}

The OPM tells me I'm using Zeos 7.3. How do I correct this problem?

Cheers,

JD

Last edited by JD (2018-05-07 10:09:37)

hnb · 2018-05-07 10:25:50

Probably you need latest Zeos (I am not sure here), you can download proper/newest version of Zeos here : https://github.com/newpascal-ccr/zeos

Zeos will be part of next release of NewPascal like mORMot .

EMartin · 2018-05-07 10:38:58

Sorry for my stupid questions, I started to use Lazarus/FPC throught fpcupdeluxe with trunk version and installing mORMot, Zeos, etc. with "Install Module" option de fpcupdeluxe. It is the best way or I must to use NewPascal ?

Thanks.

hnb · 2018-05-07 11:30:06

Both ways are good. Additional advantage of NewPascal is close cooperation with mORMot, so every change in critical parts of NewPascal (RTL, low level details) are handled in mORMot immediately. FPC trunk is also supported but in some situations update for mORMot may be delayed (and mix of FPC trunk and mORMot may be nonfunctional/full of bugs for some time).

Also NewPascal contains additional patches, bugfixes and features. For example "default field" feature or SmartPointers/ARC objects can be used only with NewPascal. I have also plan of special module dedicated for mORMot for extra features of NewPascal.

mORMot is freedom of choice

EMartin · 2018-05-07 13:13:30

Thanks @hnb, I asked because I read the @ab blog (http://blog.synopse.info/post/2018/02/0 … C-with-FPC) and him use the trunk version of the FPC.

hnb · 2018-05-07 18:42:59

This was some time ago, when I was part of FPC core team and NewPascal was almost integrated with official FPC page... Now I have ban in FPC core mailing list and I don't have access to trunk anymore - there is no rational reason for my banishment... I am not able to provide any updates, bug fixes nor new features into FPC trunk. Political decision and revenge of one person in core team...

Anyway still nothing wrong with using FPC trunk instead of NewPascal - individual decision .

Last edited by hnb (2018-05-07 18:51:06)

JD · 2018-05-08 08:01:42

hnb wrote:

Probably you need latest Zeos (I am not sure here), you can download proper/newest version of Zeos here : https://github.com/newpascal-ccr/zeos
Zeos will be part of next release of NewPascal like mORMot .

There is still a problem somewhere. I did as you suggested and got Zeos from the link you provided but the result was the same.

I got the following error message as before in SynDBZeos.pas:

SynDBZeos.pas(1248,14) Error: identifier idents no member "ColumnsToJSON"

The line with the problem is as follows:

  {$if defined(ZEOS73UP) and defined(USE_SYNCOMMONS)}
  fResultSet.ColumnsToJSON(WR);
  {$ELSE}

However, when I edited line 61 of Zeos.inc and undefined USE_SYNCOMMONS like this:

{.$DEFINE USE_SYNCOMMONS} //enable JSON content support by using SynCommons.pas from Synopse project

I was then able to compile my project. So it looks like the problem comes from how Zeos 7.3 and above are supposed to use SynCommons.pas.

I was unable to locate the method ColumnsToJSON in SynCommons.pas so where is this method located?

Ideally, I would prefer to be able to export resultsets to JSON using ColumnsToJSON as expected.

While this "workaround" enabled me to compile my project, what are the side-effects in terms of speed of the REST server's
handling of queries?

Cheers,

JD

Last edited by JD (2018-05-08 08:05:47)

ab · 2018-05-08 08:13:06

ColumnsToJSON is part of Zeos, not mORMot.
You enabled it by defining the conditional.

As side effect, it will be faster, since Zeos will directly generate the JSON for you.

JD · 2018-05-08 08:29:21

ab wrote:

ColumnsToJSON is part of Zeos, not mORMot.
You enabled it by defining the conditional.
As side effect, it will be faster, since Zeos will directly generate the JSON for you.

Hi there ab,

I did not define the conditional. It was defined in the most recent version of Zeos that I downloaded from NewPascal GitHub. I have an older version of Zeos 7.3 alpha where it was undefined. I just verified that.

So what do I do now, I like the extra speed gains ColumnsToJSON will bring to my server?

Should we bring EgonHugeist/Michael into the picture?

Cheers,

JD

Last edited by JD (2018-05-08 08:38:39)

JD · 2018-05-08 08:33:24

hnb wrote:

This was some time ago, when I was part of FPC core team and NewPascal was almost integrated with official FPC page... Now I have ban in FPC core mailing list and I don't have access to trunk anymore - there is no rational reason for my banishment... I am not able to provide any updates, bug fixes nor new features into FPC trunk. Political decision and revenge of one person in core team...
Anyway still nothing wrong with using FPC trunk instead of NewPascal - individual decision .

I read what you posted on the Lazarus forum and I was not happy. We are a small community and we need each other so that the project can move forward and stay alive.

Maybe you should accept Thaddy's offer of mediation so that we can get over this speedbump and move forward.

JD

edwinsn · 2018-05-08 09:34:57

@hnb,

What were you banned and can you point me to the page of the relative discussion?

EgonHugeist · 2018-05-08 09:51:02

Hi JD,

{$if defined(ZEOS73UP) and defined(USE_SYNCOMMONS)}
  fResultSet.ColumnsToJSON(WR);
  {$ELSE}
...

as Arnaud wrote: the IZResultSet.ColumnsToJSON is part of Zeos, defined in ZDbcIntfs.pas.
It skips the interface calling chain and brings best performance per driver to write the JSON contents.

I wonder about your regression. As the define shows, you can use the procedure only if both defines are enabled.
The ZEOS73UP define is located in Zeos.inc (included in SynDBZeos.pas) and available only in the 7.3 branches.
Secondary define is your choice to define it in your Project.

Check old revisions of zeos on your computer. It looks to me like your mixing old files somewhere. Check the USE_SYNCOMMONS define too.

@hnb
great news for Zeos, thank to all.

JD · 2018-05-08 10:05:29

EgonHugeist wrote:

Hi JD,
{$if defined(ZEOS73UP) and defined(USE_SYNCOMMONS)}
  fResultSet.ColumnsToJSON(WR);
  {$ELSE}
...
as Arnaud wrote: the IZResultSet.ColumnsToJSON is part of Zeos, defined in ZDbcIntfs.pas.
It skips the interface calling chain and brings best performance per driver to write the JSON contents.
I wonder about your regression. As the define shows, you can use the procedure only if both defines are enabled.
The ZEOS73UP define is located in Zeos.inc (included in SynDBZeos.pas) and available only in the 7.3 branches.
Secondary define is your choice to define it in your Project.
Check old revisions of zeos on your computer. It looks to me like your mixing old files somewhere. Check the USE_SYNCOMMONS define too.
@hnb
great news for Zeos, thank to all.

Hi there Michael,

I am talking about 3 separate computers here. My Windows 7 laptop has the newest NewPascal, mORMot and Zeos, that is the one on which I am trying to get ColumnsToJSON to work.

My Windows 7 desktop has older versions of all three, all is well over there as it does not use ColumnsToJSON (I checked it) . On my desktop the line 61 of Zeos.inc was undefined by default.

I have a third Linux laptop with older versions where compilation is OK there too.

I still persist in saying I did not define USE_SYNCOMMONS in line 61 of Zeos.inc of the Zeos version I downloaded this morning.

Cheers,

JD

EDIT: Sorry I reported your post by mistake

Last edited by JD (2018-05-08 10:15:58)

hnb · 2018-05-08 10:38:00

edwinsn wrote:

@hnb,
What were you banned and can you point me to the page of the relative discussion?

to get full picture you need to track April/May mailing list archives (you can read all discussion by clicking "Next message (by thread)" in bottom):

http://lists.freepascal.org/pipermail/f … 38863.html
http://lists.freepascal.org/pipermail/f … 38880.html

after my last message I have got permanent ban - I have no access to SVN FPC repository/trunk nor internal "core mailing list".

TLTR, the general summary (this was not first situation):

http://lists.freepascal.org/pipermail/f … 38893.html

Last edited by hnb (2018-05-08 10:56:23)

edwinsn · 2018-05-08 13:26:19

Hi Maciej,

I had a quick look, and I'm sorry to hear that. All after all, I appreciate all of you for all your great works in the pascal community

mORMot Open Source

#1 2018-05-06 23:37:45

NewPascal 1.9 cannot compile mORMot programs

#2 2018-05-07 06:30:49

Re: NewPascal 1.9 cannot compile mORMot programs

#3 2018-05-07 06:53:19

Re: NewPascal 1.9 cannot compile mORMot programs

#4 2018-05-07 06:57:47

Re: NewPascal 1.9 cannot compile mORMot programs

#5 2018-05-07 07:06:32

Re: NewPascal 1.9 cannot compile mORMot programs

#6 2018-05-07 07:26:26

Re: NewPascal 1.9 cannot compile mORMot programs

#7 2018-05-07 07:29:20

Re: NewPascal 1.9 cannot compile mORMot programs

#8 2018-05-07 08:58:06

Re: NewPascal 1.9 cannot compile mORMot programs

#9 2018-05-07 09:25:00

Re: NewPascal 1.9 cannot compile mORMot programs

#10 2018-05-07 10:07:35

Re: NewPascal 1.9 cannot compile mORMot programs

#11 2018-05-07 10:25:50

Re: NewPascal 1.9 cannot compile mORMot programs

#12 2018-05-07 10:38:58

Re: NewPascal 1.9 cannot compile mORMot programs

#13 2018-05-07 11:30:06

Re: NewPascal 1.9 cannot compile mORMot programs

#14 2018-05-07 13:13:30

Re: NewPascal 1.9 cannot compile mORMot programs

#15 2018-05-07 18:42:59

Re: NewPascal 1.9 cannot compile mORMot programs

#16 2018-05-08 08:01:42

Re: NewPascal 1.9 cannot compile mORMot programs

#17 2018-05-08 08:13:06

Re: NewPascal 1.9 cannot compile mORMot programs

#18 2018-05-08 08:29:21

Re: NewPascal 1.9 cannot compile mORMot programs

#19 2018-05-08 08:33:24

Re: NewPascal 1.9 cannot compile mORMot programs

#20 2018-05-08 09:34:57

Re: NewPascal 1.9 cannot compile mORMot programs

#21 2018-05-08 09:51:02

Re: NewPascal 1.9 cannot compile mORMot programs

#22 2018-05-08 10:05:29

Re: NewPascal 1.9 cannot compile mORMot programs

#23 2018-05-08 10:38:00

Re: NewPascal 1.9 cannot compile mORMot programs

#24 2018-05-08 13:26:19

Re: NewPascal 1.9 cannot compile mORMot programs

Board footer