libs-gsweb/GSWeb/GSWConstantValueAssociation.m
Dave Wetzel bd96878757 rename all *.framework top level directories to their basename.
* GSWDatabase/WODisplayGroup.m
remove local NSAutoreleasePool
adjust makefiles



git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@30698 72102866-910b-0410-8b05-ffd578937521
2010-06-14 04:19:25 +00:00

117 lines
3.1 KiB
Objective-C

/** GSWConstantValueAssociation.m - <title>GSWeb: Class GSWConstantValueAssociation</title>
Copyright (C) 1999-2004 Free Software Foundation, Inc.
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
Date: Feb 1999
$Revision$
$Date$
This file is part of the GNUstep Web Library.
<license>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public
License along with this library; if not, write to the Free
Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
</license>
**/
#include "config.h"
RCS_ID("$Id$")
#include "GSWeb.h"
//====================================================================
@implementation GSWConstantValueAssociation
//--------------------------------------------------------------------
-(id)initWithValue:(id)aValue
{
//OK
if ((self=[super init]))
{
ASSIGNCOPY(_value,aValue);
};
return self;
};
//--------------------------------------------------------------------
-(void)dealloc
{
DESTROY(_value);
[super dealloc];
};
//--------------------------------------------------------------------
-(id)copyWithZone:(NSZone*)zone
{
GSWConstantValueAssociation* clone = [super copyWithZone:zone];
ASSIGN(clone->_value,_value);
return clone;
};
//--------------------------------------------------------------------
-(NSString*)debugDescription
{
NSString* dscr=[NSString stringWithFormat:@"<%s %p - value=%@ (class: %@)>",
object_getClassName(self),
(void*)self,
_value,
[_value class]];
return dscr;
};
//--------------------------------------------------------------------
-(BOOL)isValueConstant
{
return YES;
};
//--------------------------------------------------------------------
-(BOOL)isValueSettable
{
return NO;
};
//--------------------------------------------------------------------
-(id)valueInComponent:(GSWComponent*)object
{
[self logTakeValue:_value];
return _value;
};
//--------------------------------------------------------------------
-(void)setValue:(id)aValue
inComponent:(GSWComponent*)object
{
ExceptionRaise0(@"GSWConstantValueAssociation",
@"Can't set value for a constant value association");
};
//--------------------------------------------------------------------
-(NSString*)description
{
NSString* dscr=nil;
dscr=[NSString stringWithFormat:@"<%s %p - value=%@ (class: %@)>",
object_getClassName(self),
(void*)self,
_value,
[_value class]];
return dscr;
};
@end