#include <stdarg.h>
#include "starpasr.h"
#include "iterator.h"
#include "idxcoltn.h"
#include "datablk.h"
#include "pasrmain.h"

id starParser;
void main (int argc, char **argv )
{
  long i;
  id dic, nameList, name;
  progName=*argv;
  starParser=[WDCStarParser alloc];
  [starParser parseDictionary: "CIFdic.c94"];
  dic=[[WDCListIterator alloc] initFrom:[starParser getDictionaryList]];
  [dic goFirst];
  dic=[[dic getCurrentObject] getContent];
  for (i=0; i<100000000; i++){
/*
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdsslakflasdkfjsdlfkjsdlfksdjflksdjflsdkfjsdlkfjsdlfkjsdlfksdjlfkjdslfksdjflksdjflsdkfjsdlkfsdlkfsdlkjflsdkflsdkfjsdlkfjsdlkfjsdlkfjsdlkflsdkfjklsd"];
    [name free];
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdsdfdsfsdklfjlksdfklsdjlfkjsdlkfjsdlkfjsdlkfjsdlkfjsdlkfjsdlkjflksdjflkdsjflksdjfklsdklfjsdlkfjsdlkjfsdlkfjdlskjfsdlkfjsdlkfjsdlkfjdslkfjdsklf"];
    [name free];
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdsfsdfjsdlkjflsdkjflksdjflksdflksdlkfjsdlkfjdslkfjlsdkjfldsfjdslkfjdslkfjdslkfjsdlkjfhsldkfsdlkfjsdlkfjdslkfjsdlkfjsdlkfjsdlkfjdslksdlkfklsd"];
    [name free];
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdsdhflsdflksdfklsdlkfjsdlkjfklsdjflksdjfsdlkfjsdlkfjsdlkfjdslkfjdslkfjdslkfsdlkfsdhflksdflksdjflkjsdlkfjsdlfkjlskdjflsdkfjsdlkfjsdlkfjsdl"];
    [name free];
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdssdsdhflsdflksdfklsdlkfjsdlkjfklsdjflksdjfsdlkfjsdlkfjsdlkfjdslkfjdslkfjdslkfsdlkfsdhflksdflksdjflkjsdlkfjsdlfkjlskdjflsdkfjsdlkfjsdlkfjsdl"];
    [name free];    
    name=[[WDCString alloc] initFromCString:"fkjdaskfsdafsdfsd;fsdf;sdfsdssdsdhflsdflksdfklsdlkfjsdlkjfklsdjflksdjfsdlkfjsdlkfjsdlkfjdslkfjdslkfjdslkfsdlkfsdhflksdflksdjflkjsdlkfjsdlfkjlskdjflsdkfjsdlkfjsdlkfjsdl"];
    [name free];

*/  
  
     [[dic getDefinitionBlocksWhos:"_category" 
			    is :"dictionary_definition"] free];
			    
     system("ps -l");
   }
}





