gnustep/libs-base
0
0
Fork 0
mirror of https://github.com/gnustep/libs-base.git synced 2025-04-22 16:33:29 +00:00
Code Issues Projects Releases Packages Wiki Activity

protocol stuf added

Browse source 
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@14728 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-Macdonald 2002-10-12 04:44:35 +00:00
parent 639a522a6c
commit 966ccd7ebf
1 changed files with 21 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
Tools/AGSParser.m
View file

@ -1174,6 +1174,27 @@
[d setObject: t forKey: @"BaseType"];
RELEASE(t);
/*
* Handle protocol specification if necessary
*/
if ([self parseSpace] < length && buffer[pos] == '<')
{
NSString *p;
pos++;
do
{
p = [self parseIdentifier];
[a addObject: p];
}
while ([self parseSpace] < length && buffer[pos] == ',');
pos++;
[self parseSpace];
[a sortUsingSelector: @selector(compare:)];
[d setObject: [a componentsJoinedByString: @","] forKey: @"Protocols"];
[a removeAllObjects];
}
/*
* Set the 'Kind' of declaration ... one of 'Types', 'Functions',
* 'Variables', or 'Constants'