Browse Source

pastojs: copy static array

git-svn-id: trunk@38288 -
Mattias Gaertner 7 years ago
parent
commit
204ad8ff02
1 changed files with 3 additions and 1 deletions
  1. 3 1
      packages/pastojs/src/fppas2js.pp

+ 3 - 1
packages/pastojs/src/fppas2js.pp

@@ -10223,7 +10223,9 @@ begin
     begin
     begin
     // TArrayType$clone(ArrayExpr);
     // TArrayType$clone(ArrayExpr);
     if ArrTypeEl.Name='' then
     if ArrTypeEl.Name='' then
-      RaiseNotSupported(El,AContext,20180218230407,'copy anonymous multi dim array');
+      RaiseNotSupported(El,AContext,20180218230407,'copy anonymous multi dim static array');
+    if length(ArrTypeEl.Ranges)>1 then
+      RaiseNotSupported(El,AContext,20180218231700,'copy multi dim static array');
     FuncContext:=AContext.GetFunctionContext;
     FuncContext:=AContext.GetFunctionContext;
     Path:=CreateReferencePath(ArrTypeEl,FuncContext,rpkPathAndName)
     Path:=CreateReferencePath(ArrTypeEl,FuncContext,rpkPathAndName)
           +FBuiltInNames[pbifnArray_Static_Clone];
           +FBuiltInNames[pbifnArray_Static_Clone];