diff options
| author | Oliver Bolte <obo@openoffice.org> | 2004-05-28 13:35:12 +0000 |
|---|---|---|
| committer | Oliver Bolte <obo@openoffice.org> | 2004-05-28 13:35:12 +0000 |
| commit | 7d336b291bf4140af149c37480d6fe567e2cbbc1 (patch) | |
| tree | 3412dafd7a23afa14f4bfb43f9b418a817f10310 /basic | |
| parent | ec6057b9b1c25a77e0ccf5f5432f5c2008e954c4 (diff) | |
INTEGRATION: CWS ab08fixes (1.16.2); FILE MERGED
2004/04/02 08:24:25 ab 1.16.2.1: #i18989# Made dim handling in DimArray() and Array() consistant to Dim command
Diffstat (limited to 'basic')
| -rw-r--r-- | basic/source/runtime/methods1.cxx | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/basic/source/runtime/methods1.cxx b/basic/source/runtime/methods1.cxx index faa4b9160557..dc45ef6d1e41 100644 --- a/basic/source/runtime/methods1.cxx +++ b/basic/source/runtime/methods1.cxx @@ -2,9 +2,9 @@ * * $RCSfile: methods1.cxx,v $ * - * $Revision: 1.16 $ + * $Revision: 1.17 $ * - * last change: $Author: obo $ $Date: 2004-03-17 13:36:19 $ + * last change: $Author: obo $ $Date: 2004-05-28 14:35:12 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -576,6 +576,8 @@ RTLFUNC(Array) // Option Base zunaechst ignorieren (kennt leider nur der Compiler) if( nArraySize ) pArray->AddDim( 0, nArraySize-1 ); + else + pArray->unoAddDim( 0, -1 ); // Parameter ins Array uebernehmen for( short i = 0 ; i < nArraySize ; i++ ) @@ -615,6 +617,9 @@ RTLFUNC(DimArray) pArray->AddDim32( 0, ub ); } } + else + pArray->unoAddDim( 0, -1 ); + // Array zurueckliefern SbxVariableRef refVar = rPar.Get(0); USHORT nFlags = refVar->GetFlags(); |