~ubuntu-branches/ubuntu/wily/aspectc++/wily

« back to all changes in this revision

Viewing changes to Puma/src/infos/CTemplateParamInfo.cc

  • Committer: Bazaar Package Importer
  • Author(s): Reinhard Tartler
  • Date: 2005-12-23 10:49:40 UTC
  • Revision ID: james.westby@ubuntu.com-20051223104940-ig4klhoi991zs7km
Tags: upstream-0.99+1.0pre2
ImportĀ upstreamĀ versionĀ 0.99+1.0pre2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
// This file is part of PUMA.
 
2
// Copyright (C) 1999-2003  The PUMA developer team.
 
3
//                                                                
 
4
// This program is free software;  you can redistribute it and/or 
 
5
// modify it under the terms of the GNU General Public License as 
 
6
// published by the Free Software Foundation; either version 2 of 
 
7
// the License, or (at your option) any later version.            
 
8
//                                                                
 
9
// This program is distributed in the hope that it will be useful,
 
10
// but WITHOUT ANY WARRANTY; without even the implied warranty of 
 
11
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the  
 
12
// GNU General Public License for more details.                   
 
13
//                                                                
 
14
// You should have received a copy of the GNU General Public      
 
15
// License along with this program; if not, write to the Free     
 
16
// Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, 
 
17
// MA  02111-1307  USA                                            
 
18
 
 
19
#include "Puma/CTemplateParamInfo.h"
 
20
#include "Puma/CTemplateInfo.h"
 
21
#include "Puma/CStructure.h"
 
22
#include "Puma/CTree.h"
 
23
 
 
24
namespace Puma {
 
25
 
 
26
 
 
27
CTemplateParamInfo::~CTemplateParamInfo () {
 
28
  if (Id () == TEMPLATE_PARAM_INFO)
 
29
    CleanUp ();
 
30
//  if (_TemplateInfo)
 
31
//    _TemplateInfo->removeTemplateParam (this);
 
32
//  if (_ValueType)
 
33
//    CTypeInfo::Destroy (_ValueType);
 
34
}
 
35
 
 
36
CT_ExprList *CTemplateParamInfo::DefaultArgument () const { 
 
37
  CTemplateInfo *tpl = _TemplateInfo;
 
38
  int pos = getPosition ();
 
39
  if (tpl && pos != -1) {
 
40
    do {
 
41
      if ((int)tpl->Parameters () > pos) {
 
42
        CTemplateParamInfo *param = tpl->Parameter (pos);
 
43
        if (param) {
 
44
          CT_TemplateParamDecl *tpd = param->Tree ();
 
45
          if (tpd && tpd->DefaultArgument ())
 
46
            return tpd->DefaultArgument ();
 
47
        }
 
48
      }
 
49
      CObjectInfo *obj = tpl->ObjectInfo (), *first = obj;
 
50
      tpl = 0;
 
51
      if (obj) {
 
52
        obj = obj->NextObject ();
 
53
        while (obj && obj != first) {
 
54
          if ((tpl = obj->Template ()))
 
55
            break;
 
56
          obj = obj->NextObject ();
 
57
        }
 
58
      }
 
59
    } while (tpl && tpl != _TemplateInfo);
 
60
  } else {
 
61
    // fallback
 
62
    CT_TemplateParamDecl *tpd = Tree ();
 
63
    if (tpd && tpd->DefaultArgument ())
 
64
      return tpd->DefaultArgument ();
 
65
  }
 
66
  return (CT_ExprList*)0;
 
67
}
 
68
 
 
69
int CTemplateParamInfo::getPosition () const {
 
70
  if (_TemplateInfo)
 
71
    for (unsigned i = 0; i < _TemplateInfo->Parameters (); i++) 
 
72
      if (*this == *_TemplateInfo->Parameter (i))
 
73
        return i;
 
74
  return -1;
 
75
}
 
76
 
 
77
 
 
78
} // namespace Puma