1 /************************************************************************* 2 * 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * Copyright 2000, 2010 Oracle and/or its affiliates. 6 * 7 * OpenOffice.org - a multi-platform office productivity suite 8 * 9 * This file is part of OpenOffice.org. 10 * 11 * OpenOffice.org is free software: you can redistribute it and/or modify 12 * it under the terms of the GNU Lesser General Public License version 3 13 * only, as published by the Free Software Foundation. 14 * 15 * OpenOffice.org is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU Lesser General Public License version 3 for more details 19 * (a copy is included in the LICENSE file that accompanied this code). 20 * 21 * You should have received a copy of the GNU Lesser General Public License 22 * version 3 along with OpenOffice.org. If not, see 23 * <http://www.openoffice.org/license.html> 24 * for a copy of the LGPLv3 License. 25 * 26 ************************************************************************/ 27 28 // MARKER(update_precomp.py): autogen include statement, do not remove 29 #include "precompiled_idlc.hxx" 30 #include <idlc/astarray.hxx> 31 32 using namespace ::rtl; 33 34 AstArray::AstArray(const OString& name, AstType* pType, const ExprList& rDimExpr, AstScope* pScope) 35 : AstType(NT_array, name, pScope) 36 , m_pType(pType) 37 , m_dimension((sal_uInt32)(rDimExpr.size())) 38 , m_dimExpressions(rDimExpr) 39 { 40 if ( m_pType ) 41 setName(makeName()); 42 } 43 44 AstArray::AstArray(AstType* pType, const ExprList& rDimExpr, AstScope* pScope) 45 : AstType(NT_array, OString("arrary_"), pScope) 46 , m_pType(pType) 47 , m_dimension((sal_uInt32)(rDimExpr.size())) 48 , m_dimExpressions(rDimExpr) 49 { 50 if ( m_pType ) 51 setName(makeName()); 52 } 53 54 OString AstArray::makeName() 55 { 56 if ( m_pType ) 57 { 58 OString name(m_pType->getScopedName()); 59 OString openBracket("["); 60 OString closeBracket("]"); 61 ExprList::iterator iter = m_dimExpressions.begin(); 62 ExprList::iterator end = m_dimExpressions.end(); 63 64 while ( iter != end ) 65 { 66 name += openBracket; 67 name += (*iter)->toString(); 68 name += closeBracket; 69 ++iter; 70 } 71 return name; 72 } 73 return OString(); 74 } 75