Change from GPL to LPGL
[fw/sdcc] / device / lib / _setjmp.c
1 /*-------------------------------------------------------------------------
2   setjmp.c - source file for ANSI routines setjmp & longjmp 
3
4              Written By -  Sandeep Dutta . sandeep.dutta@usa.net (1998)
5
6    This library is free software; you can redistribute it and/or modify it
7    under the terms of the GNU Library General Public License as published by the
8    Free Software Foundation; either version 2, or (at your option) any
9    later version.
10    
11    This library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU Library General Public License for more details.
15    
16    You should have received a copy of the GNU Library General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19    
20    In other words, you are welcome to use, share and improve this program.
21    You are forbidden to forbid anyone else to use, share and improve
22    what you give them.   Help stamp out software-hoarding!  
23 -------------------------------------------------------------------------*/
24 #include <8051.h>
25
26
27
28 int longjmp (unsigned char _generic *bp, int rv)
29 {
30     unsigned char lsp; 
31     lsp = *(bp+2);
32     *((unsigned char data *) lsp) = *bp++;
33     *((unsigned char data *) lsp - 1) = *bp;
34     SP = lsp;
35     return rv;
36 }
37
38 int setjmp( unsigned char _generic *bp) {    
39   
40     /* registers would have been saved on the
41        stack anyway so we need to save SP
42        and the return address */     
43     *bp++ = *((unsigned char data *) SP  );   
44     *bp++ = *((unsigned char data *)SP - 1);    
45     *bp   = SP;
46     return 0;
47         
48 }