ObjPgSQL  Artifact [b4a5cbfd43]

Artifact b4a5cbfd4397441f0c948b5828b2d61f0a7eedeb63a0531ee23f7f6a8931fffa:

• File PGResult.m — part of check-in [de46b0e10c] at 2012-10-03 13:20:06 on branch trunk — Initial import. (user: js, size: 669) [annotate] [blame] [check-ins using]

#import "PGResult.h"
#import "PGResultRow.h"

@implementation PGResult
+ PG_resultWithResult: (PGresult*)result
{
	return [[[self alloc] PG_initWithResult: result] autorelease];
}

- PG_initWithResult: (PGresult*)result_
{
	self = [super init];

	result = result_;

	return self;
}

- (void)dealloc
{
	if (result != NULL)
		PQclear(result);

	[super dealloc];
}

- (size_t)count
{
	return PQntuples(result);
}

- (id)objectAtIndex: (size_t)index
{
	if (index > PQntuples(result))
		@throw [OFOutOfRangeException
		    exceptionWithClass: [self class]];

	return [PGResultRow rowWithResult: self
				      row: index];
}

- (PGresult*)PG_result
{
	return result;
}
@end