2
0
Эх сурвалжийг харах

* fixed crashes with length(pchar) and length(pwidechar) after
r9360-r9361

git-svn-id: trunk@9363 -

Jonas Maebe 17 жил өмнө
parent
commit
feec2a74f2

+ 2 - 0
compiler/ninl.pas

@@ -2049,6 +2049,7 @@ implementation
                             { make sure the left node doesn't get disposed, since it's }
                             { make sure the left node doesn't get disposed, since it's }
                             { reused in the new node (JM)                              }
                             { reused in the new node (JM)                              }
                             left:=nil;
                             left:=nil;
+                            exit;
                          end
                          end
                         else if is_pwidechar(left.resultdef) then
                         else if is_pwidechar(left.resultdef) then
                          begin
                          begin
@@ -2057,6 +2058,7 @@ implementation
                             { make sure the left node doesn't get disposed, since it's }
                             { make sure the left node doesn't get disposed, since it's }
                             { reused in the new node (JM)                              }
                             { reused in the new node (JM)                              }
                             left:=nil;
                             left:=nil;
+                            exit;
                          end
                          end
                         else
                         else
                          CGMessage(type_e_mismatch);
                          CGMessage(type_e_mismatch);