paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 02:30:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* small formatting adjustments for the sake of consistency

Browse Source 
git-svn-id: trunk@46892 -
This commit is contained in:
svenbarth 2020-09-18 15:00:17 +00:00
parent 2ff18e48a0
commit bf1eae7bd6
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
compiler/ncnv.pas
View File

@ -151,7 +151,7 @@ interface
function _typecheck_interface_to_variant : tnode;
function _typecheck_array_2_dynarray : tnode;
function _typecheck_elem_2_openarray : tnode;
function _typecheck_arrayconstructor_to_dynarray: tnode;
function _typecheck_arrayconstructor_to_dynarray : tnode;
function _typecheck_arrayconstructor_to_array : tnode;
protected
function first_int_to_int : tnode;virtual;
@ -2001,12 +2001,13 @@ implementation
function ttypeconvnode.typecheck_arrayconstructor_to_dynarray : tnode;
var
newstatement,assstatement:tstatementnode;
arrnode:ttempcreatenode;
temp2:ttempcreatenode;
assnode:tnode;
paracount:integer;
elemnode:tarrayconstructornode;
newstatement,
assstatement : tstatementnode;
arrnode : ttempcreatenode;
temp2 : ttempcreatenode;
assnode : tnode;
paracount : integer;
elemnode : tarrayconstructornode;
begin
{ assignment of []? }
if (