Am 25.02.2015 um 18:47 schrieb Alfred:
Hello Steve, all,
I would like to report 100% success with the latest RTTI patches !!!!
Nice to hear.
If anything is not compatible with the information delphi provides please report back to me.
One (first) request:
Would it be ok to add pfConstRef to the TParamFlag in typinfo.pp ?
The RTTI should already be generated the enum value was simply missing.
See attached Patch.
One (second) request:
The same RTTI on ARM would also be very welcome.
As stated before, my interest is running mORMot on ARM (e.g. Raspberry Pi[2]).
Since I'm unable to test it myself right now, I could only try to write this blind and let somebody else do the testing. It would also help to know what calling conventions are supported and how they work if they are not compareable to the i386/x64 ones.
(Link to a good documentation or a short write up)
The other way this could work is, if somebody with an ARM system takes over and I explain where compiler changes need to be made.

mfg Steve
>From 87e08189db2616e6295f50fe189c03a4edab922b Mon Sep 17 00:00:00 2001
From: Steve Hildebrandt <[email protected]>
Date: Wed, 25 Feb 2015 19:02:22 +0100
Subject: [PATCH 5/5] Added pfConstRef

---
 rtl/objpas/typinfo.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/objpas/typinfo.pp b/rtl/objpas/typinfo.pp
index 4e0db32..96eaca5 100644
--- a/rtl/objpas/typinfo.pp
+++ b/rtl/objpas/typinfo.pp
@@ -54,7 +54,7 @@ unit typinfo;
        TMethodKind = (mkProcedure,mkFunction,mkConstructor,mkDestructor,
                       mkClassProcedure,mkClassFunction,mkClassConstructor, 
                       mkClassDestructor,mkOperatorOverload);
-       TParamFlag     = (pfVar,pfConst,pfArray,pfAddress,pfReference,pfOut);
+       TParamFlag     = 
(pfVar,pfConst,pfArray,pfAddress,pfReference,pfOut,pfConstRef);
        TParamFlags    = set of TParamFlag;
        TIntfFlag      = (ifHasGuid,ifDispInterface,ifDispatch,ifHasStrGUID);
        TIntfFlags     = set of TIntfFlag;
-- 
1.9.5.msysgit.0

_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to