1
// This file is part of PUMA.
2
// Copyright (C) 1999-2003 The PUMA developer team.
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.
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.
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,
19
#include "Puma/ACAdviceInfo.h"
20
#include "Puma/ACAspectInfo.h"
28
CFunctionInfo *ACAdviceInfo::function () {
29
CClassInfo *cls = root ()->Aspect ()->ClassInfo ();
30
for (unsigned f = 0; f < cls->Functions (); f++) {
31
CFunctionInfo *func = cls->Function(f);
32
if (strcmp (func->Name (), name ()) == 0) return func;