static void ProcName( void ) /**************************/ { int index; if( !MakeToken( SEP_NO, true ) ) { return; } if( !ProcessKeyList( ApplicationTypes, CmdFile->token, CmdFile->len ) ) { if( GotModName ) { Warning( "module name multiply defined", OPTION_SLOT ); } else { AddStringOption( "modname", CmdFile->token, CmdFile->len ); GotModName = true; } } for( index = 0; index < 2; index++ ) { if( !MakeToken( SEP_NO, true ) ) { return; } if( !ProcessKeyList( ApplicationTypes, CmdFile->token, CmdFile->len ) ) { DirectiveError(); } } }
static void ProcLibrary( void ) /*****************************/ { bool gotprivate; gotprivate = ProcessKeyword( LibraryTypes ); FmtInfo = DLL_INITGLOBAL; if( !MakeToken( SEP_NO, true ) ) { return; } if( !IsInitType() ) { if( CmdFile->len > 8 ) { Warning( "module name too large", OPTION_SLOT ); } else if( GotModName ) { Warning( "module name multiply defined" , OPTION_SLOT ); } else { AddStringOption( "modname", CmdFile->token, CmdFile->len ); GotModName = true; } if( !MakeToken( SEP_NO, true ) ) { return; } } if( !IsInitType() ) { DirectiveError(); } if( !gotprivate ) { ProcessKeyword( LibraryTypes ); } }
static void ProcStub( void ) /**************************/ { if( !MakeToken( SEP_QUOTE, true ) ) { Warning( "argument for stub not valid", OPTION_SLOT ); } else { AddStringOption( "stub", CmdFile->token, CmdFile->len ); } }
static void ProcOld( void ) /*************************/ { if( !MakeToken( SEP_QUOTE, TRUE ) ) { Warning( "argument for old not valid", OPTION_SLOT ); } else { AddStringOption( "old", CmdFile->token, CmdFile->len ); } }