mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-21 02:41:04 +00:00
get rid of RCS_ID as shortly discussed with David and Manuel git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@37929 72102866-910b-0410-8b05-ffd578937521
114 lines
2.9 KiB
Objective-C
114 lines
2.9 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"
|
|
|
|
#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
|
|
{
|
|
return NSStringFromClass([_value class]);
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(BOOL)isValueConstant
|
|
{
|
|
return YES;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(BOOL)isValueSettable
|
|
{
|
|
return NO;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(id)valueInComponent:(GSWComponent*)object
|
|
{
|
|
if (_debugEnabled)
|
|
{
|
|
[self _logPullValue:_value
|
|
inComponent:object];
|
|
}
|
|
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
|
|
|