Mercurial > ecos-v2_0-branch

comparison packages/language/c/libc/setjmp/current/src/longjmp.cxx @ 115:6ed91473a1cd ecos-sw-2000-08-21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from eCos master repository on 2000-08-21-22:40:54-BST
author jlarmour
date Fri, 25 Aug 2000 17:32:38 +0000
parents
children e0c0827131d1
comparison
equal deleted inserted replaced
114:5ad2b71d525e 115:6ed91473a1cd
1 //===========================================================================
2 //
3 // longjmp.cxx
4 //
5 // ISO C standard longjmp() function
6 //
7 //===========================================================================
8 //####COPYRIGHTBEGIN####
9 //
10 // -------------------------------------------
11 // The contents of this file are subject to the Red Hat eCos Public License
12 // Version 1.1 (the "License"); you may not use this file except in
13 // compliance with the License. You may obtain a copy of the License at
14 // http://www.redhat.com/
15 //
16 // Software distributed under the License is distributed on an "AS IS"
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
18 // License for the specific language governing rights and limitations under
19 // the License.
20 //
21 // The Original Code is eCos - Embedded Configurable Operating System,
22 // released September 30, 1998.
23 //
24 // The Initial Developer of the Original Code is Red Hat.
25 // Portions created by Red Hat are
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc.
27 // All Rights Reserved.
28 // -------------------------------------------
29 //
30 //####COPYRIGHTEND####
31 //===========================================================================
32 //#####DESCRIPTIONBEGIN####
33 //
34 // Author(s): jlarmour
35 // Contributors:
36 // Date: 2000-04-30
37 // Purpose:
38 // Description: Implements ISO standard non-local jump function longjmp()
39 // per ISO C para 7.6.2.1. This is the "real" alternative to
40 // the inline version of longjmp()
41 //
42 // Usage:
43 //
44 //####DESCRIPTIONEND####
45 //
46 //===========================================================================
47
48 // CONFIGURATION
49
50 #include <pkgconf/libc_setjmp.h> // Configuration header
51
52 // INCLUDES
53
54 #include <cyg/infra/cyg_type.h> // Common type definitions and support
55 #include <cyg/infra/cyg_trac.h> // Common tracing code
56 #include <cyg/infra/cyg_ass.h> // Common assertion code
57 #include <cyg/hal/hal_arch.h> // HAL architecture specific implementation
58
59 // We don't want the inline version of longjmp() defined here
60 #ifdef CYGIMP_LIBC_SETJMP_INLINES
61 # undef CYGIMP_LIBC_SETJMP_INLINES
62 #endif
63
64 #include <setjmp.h> // Header for setjmp/longjmp
65
66
67 // FUNCTIONS
68
69 void
70 longjmp( jmp_buf cyg_buf, int cyg_val)
71 {
72 CYG_REPORT_FUNCNAME( "longjmp" );
73 CYG_REPORT_FUNCARG2( "&cyg_buf=%08x, cyg_val=%d", &cyg_buf, cyg_val );
74
75 // ANSI says that if we are passed cyg_val==0, then we change it to 1
76 if (cyg_val == 0)
77 ++cyg_val;
78
79 // we let the HAL do the work
80
81 HAL_REORDER_BARRIER(); // prevent any chance of optimisation re-ordering
82 hal_longjmp( cyg_buf, cyg_val );
83 HAL_REORDER_BARRIER(); // prevent any chance of optimisation re-ordering
84
85 #ifdef CYGDBG_USE_ASSERTS
86 CYG_ASSERT( 0, "longjmp should not have reached this point!" );
87 #else
88 for (;;)
89 CYG_EMPTY_STATEMENT;
90 #endif
91 } // longjmp()
92
93 // EOF longjmp.cxx