home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
oclsrc15.zip
/
OCL
/
Source
/
OXApp.cpp
< prev
next >
Wrap
C/C++ Source or Header
|
1996-08-12
|
3KB
|
133 lines
// OCL - OS/2 Class Library
// (c) Cubus 1995
// All Rights Reserved
// OApp.cpp
/*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Neither the name Cubus nor the name Team OCL may be used to
* endorse or promote products derived from this software
* without specific prior written permission.
* 3. See OCL.INF for a detailed copyright notice.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
// $Header: W:/Projects/OCL/Source/rcs/OXApp.cpp 1.50 1996/08/11 23:49:36 B.STEIN Release $
#define __OCL_SOURCE__
#define OINCL_OSTRING
#define OINCL_BASE
#include <ocl.hpp>
#include <OXApp.hpp>
#include <OMsgs.hpp>
#include <OVioException.hpp>
#include <OPMException.hpp>
// OXApp
OXApp::OXApp(ULONG queueSize)
: OApp(queueSize)
{}
OXApp::OXApp(const ULONG num, CHAR *Parms[], ULONG queueSize)
: OApp(num, Parms, queueSize)
{}
OXApp::~OXApp()
{}
PSZ OXApp::isOfType() const
{
return("OXApp");
}
// message loop
void OXApp::run()
{
OMsgs msg;
BOOL continuable = TRUE;
while(continuable)
{
continuable = FALSE;
try
{
OApp::run();
}
catch(OException& except)
{
OString message(except.description);
message + "\n"
+ OMessage(200, OCL::MSGFILE, except.isOfType());
switch(except.severity())
{
case OException::recoverable:
case OException::unrecoverable:
{
continuable = TRUE;
msg.info(OMessage(205, OCL::MSGFILE), message);
break;
}
case OException::fatal:
{
message + "\n"
+ OMessage(201, OCL::MSGFILE)
+ OMessage(202, OCL::MSGFILE);
msg.info(OMessage(205, OCL::MSGFILE), message);
break;
}
}
}
catch(OCLObject& except)
{
OString message(OMessage(203, OCL::MSGFILE));
message + "\n"
+ OMessage(200, OCL::MSGFILE, except.isOfType())
+ OMessage(202, OCL::MSGFILE),
msg.info(OMessage(205, OCL::MSGFILE), message);
}
catch(...)
{
OString message(OMessage(204, OCL::MSGFILE));
message + OMessage(202, OCL::MSGFILE);
msg.info(OMessage(205, OCL::MSGFILE), message);
}
}
}
// end of source