View Issue Details
ID | Project | Category | View Status | Date Submitted | Last Update |
---|---|---|---|---|---|
0037750 | pas2js | rtl | public | 2020-09-15 21:54 | 2020-10-06 13:17 |
Reporter | henrique | Assigned To | Michael Van Canneyt | ||
Priority | normal | Severity | minor | Reproducibility | always |
Status | resolved | Resolution | fixed | ||
Platform | Pas2Js | OS | Windows | ||
Fixed in Version | trunk | ||||
Summary | 0037750: GetMethods | ||||
Description | I changed the GetMethods implementation to assemble the results array, depending on the class hierarchy. | ||||
Tags | No tags attached. | ||||
Fixed in Revision | 890 | ||||
Attached Files |
|
|
Metodos.patch (1,001 bytes)
From 1159301e17594ce29930454200ede5bad3ca07bf Mon Sep 17 00:00:00 2001 From: Henrique Gottardi Werlang <henriquewerlang@hotmail.com> Date: Tue, 15 Sep 2020 16:49:49 -0300 Subject: [PATCH] Mudado o getmethods. --- packages/rtl/rtti.pas | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/packages/rtl/rtti.pas b/packages/rtl/rtti.pas index 8cda217..fc42b48 100644 --- a/packages/rtl/rtti.pas +++ b/packages/rtl/rtti.pas @@ -689,17 +689,18 @@ begin BaseClass := BaseClass.GetAncestor; end; - SetLength(Result, StructTypeInfo.MethodCount); + SetLength(Result, MethodCount); BaseClass := Self; + MethodCount := 0; while Assigned(BaseClass) do begin for A := 0 to Pred(BaseClass.StructTypeInfo.MethodCount) do begin - Dec(MethodCount); - Result[MethodCount] := TRttiMethod.Create(BaseClass, BaseClass.StructTypeInfo.GetMethod(A)); + + Inc(MethodCount); end; BaseClass := BaseClass.GetAncestor; -- 2.28.0.windows.1 |
|
This correct and can be applied? |
|
Applied, please check because the patch no longer applied cleanly. Thanks for the patch. |
Date Modified | Username | Field | Change |
---|---|---|---|
2020-09-15 21:54 | henrique | New Issue | |
2020-09-15 21:54 | henrique | File Added: Metodos.patch | |
2020-09-16 23:52 | Michael Van Canneyt | Assigned To | => Michael Van Canneyt |
2020-09-16 23:52 | Michael Van Canneyt | Status | new => assigned |
2020-10-05 22:43 | henrique | Note Added: 0126105 | |
2020-10-06 10:21 | Michael Van Canneyt | Status | assigned => resolved |
2020-10-06 10:21 | Michael Van Canneyt | Resolution | open => fixed |
2020-10-06 10:21 | Michael Van Canneyt | Fixed in Version | => trunk |
2020-10-06 10:21 | Michael Van Canneyt | Fixed in Revision | => 890 |
2020-10-06 10:21 | Michael Van Canneyt | Note Added: 0126106 |