TrappingDispatcher.cpp
Go to the documentation of this file.
1
/*----------------------------------------------------------------------------*/
2
/* */
3
/* Copyright (c) 1995, 2004 IBM Corporation. All rights reserved. */
4
/* Copyright (c) 2005-2009 Rexx Language Association. All rights reserved. */
5
/* */
6
/* This program and the accompanying materials are made available under */
7
/* the terms of the Common Public License v1.0 which accompanies this */
8
/* distribution. A copy is also available at the following address: */
9
/* http://www.oorexx.org/license.html */
10
/* */
11
/* Redistribution and use in source and binary forms, with or */
12
/* without modification, are permitted provided that the following */
13
/* conditions are met: */
14
/* */
15
/* Redistributions of source code must retain the above copyright */
16
/* notice, this list of conditions and the following disclaimer. */
17
/* Redistributions in binary form must reproduce the above copyright */
18
/* notice, this list of conditions and the following disclaimer in */
19
/* the documentation and/or other materials provided with the distribution. */
20
/* */
21
/* Neither the name of Rexx Language Association nor the names */
22
/* of its contributors may be used to endorse or promote products */
23
/* derived from this software without specific prior written permission. */
24
/* */
25
/* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS */
26
/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT */
27
/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS */
28
/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT */
29
/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, */
30
/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED */
31
/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, */
32
/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY */
33
/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING */
34
/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS */
35
/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
36
/* */
37
/*----------------------------------------------------------------------------*/
38
39
#include "
RexxCore.h
"
40
#include "
TrappingDispatcher.hpp
"
41
#include "
Interpreter.hpp
"
42
#include "
InterpreterInstance.hpp
"
43
#include "
RexxActivity.hpp
"
44
#include "
RexxNativeActivation.hpp
"
45
46
47
/**
48
* Default virtual method for handling a run() methods on
49
* an activity dispatcher.
50
*/
51
void
TrappingDispatcher::run
()
52
{
53
// this just returns
54
}
55
56
57
/**
58
* Default handler for any error conditions. This just sets the
59
* condition information in the dispatch unit.
60
*
61
* @param c The condition information for the error.
62
*/
63
void
TrappingDispatcher::handleError
(
wholenumber_t
r,
RexxDirectory
*c)
64
{
65
// save the condition information
66
rc
= r;
67
conditionData
= c;
68
}
69
70
71
/**
72
* Default handler for any error conditions. This just sets the
73
* condition information in the dispatch unit.
74
*
75
* @param c The condition information for the error.
76
*/
77
void
TrappingDispatcher::handleError
(
RexxDirectory
*c)
78
{
79
// this only gets added if there is a condition
80
if
(c !=
OREF_NULL
)
81
{
82
// raise this as a normal error by default
83
activation
->
checkConditions
();
84
}
85
}
86
87
Interpreter.hpp
InterpreterInstance.hpp
RexxActivity.hpp
RexxCore.h
OREF_NULL
#define OREF_NULL
Definition:
RexxCore.h:61
RexxNativeActivation.hpp
TrappingDispatcher.hpp
RexxDirectory
Definition:
DirectoryClass.hpp:49
RexxNativeActivation::checkConditions
void checkConditions()
Definition:
RexxNativeActivation.cpp:1754
TrappingDispatcher::handleError
virtual void handleError(wholenumber_t, RexxDirectory *)
Definition:
TrappingDispatcher.cpp:63
TrappingDispatcher::run
virtual void run()
Definition:
TrappingDispatcher.cpp:51
TrappingDispatcher::rc
wholenumber_t rc
Definition:
TrappingDispatcher.hpp:59
TrappingDispatcher::conditionData
RexxDirectory * conditionData
Definition:
TrappingDispatcher.hpp:64
TrappingDispatcher::activation
RexxNativeActivation * activation
Definition:
TrappingDispatcher.hpp:63
wholenumber_t
ssize_t wholenumber_t
Definition:
rexx.h:230
oorexx
executor
sandbox
jlf
trunk
interpreter
concurrency
TrappingDispatcher.cpp
Generated by
1.9.2