1 |
2596
|
stephane
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
2 |
|
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
3 |
|
|
<head>
|
4 |
|
|
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
|
5 |
|
|
<title>gBase: macros.h Source File</title>
|
6 |
|
|
<link href="tabs.css" rel="stylesheet" type="text/css"/>
|
7 |
|
|
<link href="doxygen.css" rel="stylesheet" type="text/css"/>
|
8 |
|
|
</head>
|
9 |
|
|
<body>
|
10 |
|
|
<!-- Generated by Doxygen 1.6.3 -->
|
11 |
|
|
<div class="navigation" id="top">
|
12 |
|
|
<div class="tabs">
|
13 |
|
|
<ul>
|
14 |
|
|
<li><a href="main.html"><span>Main Page</span></a></li>
|
15 |
|
|
<li><a href="annotated.html"><span>Data Structures</span></a></li>
|
16 |
|
|
<li class="current"><a href="files.html"><span>Files</span></a></li>
|
17 |
|
|
</ul>
|
18 |
|
|
</div>
|
19 |
|
|
<div class="tabs">
|
20 |
|
|
<ul>
|
21 |
|
|
<li><a href="files.html"><span>File List</span></a></li>
|
22 |
|
|
<li><a href="globals.html"><span>Globals</span></a></li>
|
23 |
|
|
</ul>
|
24 |
|
|
</div>
|
25 |
|
|
<h1>macros.h</h1><a href="macros_8h.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001
|
26 |
|
|
<a name="l00005"></a>00005 <span class="comment">/*</span>
|
27 |
|
|
<a name="l00006"></a>00006 <span class="comment">This source file is part of Scol</span>
|
28 |
|
|
<a name="l00007"></a>00007 <span class="comment">For the latest info, see http://www.scolring.org</span>
|
29 |
|
|
<a name="l00008"></a>00008 <span class="comment"></span>
|
30 |
|
|
<a name="l00009"></a>00009 <span class="comment">Copyright (c) 2010 Stephane Bisaro, aka Iri <iri@irizone.net></span>
|
31 |
|
|
<a name="l00010"></a>00010 <span class="comment"></span>
|
32 |
|
|
<a name="l00011"></a>00011 <span class="comment">This program is free software; you can redistribute it and/or modify it under</span>
|
33 |
|
|
<a name="l00012"></a>00012 <span class="comment">the terms of the GNU Lesser General Public License as published by the Free Software</span>
|
34 |
|
|
<a name="l00013"></a>00013 <span class="comment">Foundation; either version 2 of the License, or (at your option) any later</span>
|
35 |
|
|
<a name="l00014"></a>00014 <span class="comment">version.</span>
|
36 |
|
|
<a name="l00015"></a>00015 <span class="comment"></span>
|
37 |
|
|
<a name="l00016"></a>00016 <span class="comment">This program is distributed in the hope that it will be useful, but WITHOUT</span>
|
38 |
|
|
<a name="l00017"></a>00017 <span class="comment">ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS</span>
|
39 |
|
|
<a name="l00018"></a>00018 <span class="comment">FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details.</span>
|
40 |
|
|
<a name="l00019"></a>00019 <span class="comment"></span>
|
41 |
|
|
<a name="l00020"></a>00020 <span class="comment">You should have received a copy of the GNU Lesser General Public License along with</span>
|
42 |
|
|
<a name="l00021"></a>00021 <span class="comment">this program; if not, write to the Free Software Foundation, Inc., 59 Temple</span>
|
43 |
|
|
<a name="l00022"></a>00022 <span class="comment">Place - Suite 330, Boston, MA 02111-1307, USA, or go to</span>
|
44 |
|
|
<a name="l00023"></a>00023 <span class="comment">http://www.gnu.org/copyleft/lesser.txt</span>
|
45 |
|
|
<a name="l00024"></a>00024 <span class="comment"></span>
|
46 |
|
|
<a name="l00025"></a>00025 <span class="comment">For others informations, please contact us from http://www.scolring.org/</span>
|
47 |
|
|
<a name="l00026"></a>00026 <span class="comment">*/</span>
|
48 |
|
|
<a name="l00027"></a>00027
|
49 |
|
|
<a name="l00028"></a>00028
|
50 |
|
|
<a name="l00029"></a>00029
|
51 |
|
|
<a name="l00030"></a>00030 <span class="comment">/*</span>
|
52 |
|
|
<a name="l00031"></a>00031 <span class="comment">// File: macros.h</span>
|
53 |
|
|
<a name="l00032"></a>00032 <span class="comment">// Temporary macros (mostly used by debugger agent)</span>
|
54 |
|
|
<a name="l00033"></a>00033 <span class="comment">// from F.J. Alberti</span>
|
55 |
|
|
<a name="l00034"></a>00034 <span class="comment">*/</span>
|
56 |
|
|
<a name="l00035"></a>00035
|
57 |
|
|
<a name="l00036"></a>00036
|
58 |
|
|
<a name="l00037"></a>00037 <span class="preprocessor">#ifndef _MACROS_H_</span>
|
59 |
|
|
<a name="l00038"></a>00038 <span class="preprocessor"></span><span class="preprocessor">#define _MACROS_H_</span>
|
60 |
|
|
<a name="l00039"></a>00039 <span class="preprocessor"></span>
|
61 |
|
|
<a name="l00040"></a>00040 <span class="preprocessor">#define SAFEdelete(p) { if (p) { free (p); (p) = NULL; } }</span>
|
62 |
|
|
<a name="l00041"></a>00041 <span class="preprocessor"></span>
|
63 |
|
|
<a name="l00042"></a>00042
|
64 |
|
|
<a name="l00043"></a>00043 <span class="preprocessor">#define _SEPTRBIT 0x00000001</span>
|
65 |
|
|
<a name="l00044"></a>00044 <span class="preprocessor"></span>
|
66 |
|
|
<a name="l00045"></a>00045
|
67 |
|
|
<a name="l00046"></a>00046 <span class="comment">/* SE conversions*/</span>
|
68 |
|
|
<a name="l00047"></a>00047 <span class="preprocessor">#define SEW2I(w) ((w)>>1)</span>
|
69 |
|
|
<a name="l00048"></a>00048 <span class="preprocessor"></span><span class="preprocessor">#define SEW2P(w) ((w)>>1)</span>
|
70 |
|
|
<a name="l00049"></a>00049 <span class="preprocessor"></span><span class="preprocessor">#define SEI2W(n) ((n)<<1)</span>
|
71 |
|
|
<a name="l00050"></a>00050 <span class="preprocessor"></span><span class="preprocessor">#define SEP2W(p) ((p)<<1 | _SEPTRBIT)</span>
|
72 |
|
|
<a name="l00051"></a>00051 <span class="preprocessor"></span>
|
73 |
|
|
<a name="l00052"></a>00052 <span class="preprocessor">#define MTOI( mot ) ((mot)>>1)</span>
|
74 |
|
|
<a name="l00053"></a>00053 <span class="preprocessor"></span><span class="preprocessor">#define MTOP( mot ) ((mot)>>1)</span>
|
75 |
|
|
<a name="l00054"></a>00054 <span class="preprocessor"></span><span class="preprocessor">#define ITOM( mot ) ((mot)<<1)</span>
|
76 |
|
|
<a name="l00055"></a>00055 <span class="preprocessor"></span><span class="preprocessor">#define PTOM( mot ) (((mot)<<1)+1)</span>
|
77 |
|
|
<a name="l00056"></a>00056 <span class="preprocessor"></span><span class="comment">/*#ifndef SCOL_FLOAT_DEFINITION</span>
|
78 |
|
|
<a name="l00057"></a>00057 <span class="comment">typedef float float32;</span>
|
79 |
|
|
<a name="l00058"></a>00058 <span class="comment">#define SCOL_FLOAT_DEFINITION</span>
|
80 |
|
|
<a name="l00059"></a>00059 <span class="comment">#endif*/</span>
|
81 |
|
|
<a name="l00060"></a>00060
|
82 |
|
|
<a name="l00061"></a>00061 <span class="comment">/* Invert two positions in the stack*/</span>
|
83 |
|
|
<a name="l00062"></a>00062 <span class="preprocessor">#define INVERT(m, a, b) {tmp_res=MMget(m,a);MMset(m,a,MMget(m,b));MMset(m,b,tmp_res);}</span>
|
84 |
|
|
<a name="l00063"></a>00063 <span class="preprocessor"></span>
|
85 |
|
|
<a name="l00064"></a>00064 <span class="comment">/*Stack management*/</span>
|
86 |
|
|
<a name="l00065"></a>00065 <span class="preprocessor">#define SEDROP(m, n) ((m)->pp += (n))</span>
|
87 |
|
|
<a name="l00066"></a>00066 <span class="preprocessor"></span>
|
88 |
|
|
<a name="l00067"></a>00067 <span class="comment">/* String management*/</span>
|
89 |
|
|
<a name="l00068"></a>00068 <span class="preprocessor">#define SEPUSHSTR(m, s) (Mpushstrbloc((m), (s)))</span>
|
90 |
|
|
<a name="l00069"></a>00069 <span class="preprocessor"></span>
|
91 |
|
|
<a name="l00070"></a>00070 <span class="preprocessor">#define CHECK(m) if ((tmp_res=m)) return tmp_res</span>
|
92 |
|
|
<a name="l00071"></a>00071 <span class="preprocessor"></span>
|
93 |
|
|
<a name="l00072"></a>00072 <span class="comment">/* #define CHAR2WCHAR(c) (c == NIL ? NULL : (PtrObjWChar) MMstart (mm,((PtrObjVoid)MMstart(mm,c))->Buffer>>1))*/</span>
|
94 |
|
|
<a name="l00073"></a>00073
|
95 |
|
|
<a name="l00074"></a>00074 <span class="comment">/* $Iri : convert any string to utf-8 (should be used with gtk ...) Don't forget to free after used !*/</span>
|
96 |
|
|
<a name="l00075"></a>00075 <span class="preprocessor">#define SCOLUTF8(string, len) g_locale_to_utf8 (string, len, NULL, NULL, NULL)</span>
|
97 |
|
|
<a name="l00076"></a>00076 <span class="preprocessor"></span><span class="comment">/* $Iri : convert any string from utf-8 Don't forget to free after used !*/</span>
|
98 |
|
|
<a name="l00077"></a>00077 <span class="preprocessor">#define UTF8SCOL(string, len) g_locale_from_utf8 (string, len, NULL, NULL, NULL)</span>
|
99 |
|
|
<a name="l00078"></a>00078 <span class="preprocessor"></span><span class="comment">/* $Iri : length of the int (234 -> 3)*/</span>
|
100 |
|
|
<a name="l00079"></a>00079 <span class="preprocessor">#define SIZEINT(x) floor (log10 (x)) + 1</span>
|
101 |
|
|
<a name="l00080"></a>00080 <span class="preprocessor"></span><span class="comment">/* $ Iri : float support */</span>
|
102 |
|
|
<a name="l00081"></a>00081 <span class="preprocessor">#define FSET(val, f) { \</span>
|
103 |
|
|
<a name="l00082"></a>00082 <span class="preprocessor"> float g = (f); \</span>
|
104 |
|
|
<a name="l00083"></a>00083 <span class="preprocessor"> (val) = (*(int*)&g) & 0xfffffffe; \</span>
|
105 |
|
|
<a name="l00084"></a>00084 <span class="preprocessor">}</span>
|
106 |
|
|
<a name="l00085"></a>00085 <span class="preprocessor"></span><span class="preprocessor">#define FGET(val) (*(float*)&(val))</span>
|
107 |
|
|
<a name="l00086"></a>00086 <span class="preprocessor"></span>
|
108 |
|
|
<a name="l00087"></a>00087 <span class="preprocessor">#endif</span>
|
109 |
|
|
</pre></div></div>
|
110 |
|
|
<hr class="footer"/><address style="text-align: right;"><small>Generated on Fri Mar 11 15:06:43 2011 for gBase by
|
111 |
|
|
<a href="http://www.doxygen.org/index.html">
|
112 |
|
|
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.3 </small></address>
|
113 |
|
|
</body>
|
114 |
|
|
</html>
|