Last change
on this file was 3619, checked in by cmv, 16 years ago |
add various #include<> for g++ 4.3 (jaunty 9.04), cmv 05/05/2009
|
File size:
1.5 KB
|
Line | |
---|
1 | // Type de donnees de base
|
---|
2 | // E. Lesquoy , E. Aubourg
|
---|
3 | // R. Ansari 04/95
|
---|
4 |
|
---|
5 | // LAL (Orsay) / IN2P3-CNRS DAPNIA/SPP (Saclay) / CEA
|
---|
6 |
|
---|
7 | #include "sopnamsp.h"
|
---|
8 | #include <string.h>
|
---|
9 | #include "datatypes.h"
|
---|
10 |
|
---|
11 | /* Nouvelle-Fonction */
|
---|
12 | const char * DataName(PBaseDataTypes typ)
|
---|
13 | {
|
---|
14 | switch (typ)
|
---|
15 | {
|
---|
16 | case kuint_1 :
|
---|
17 | return ("uint_1");
|
---|
18 | case kint_1 :
|
---|
19 | return ("int_1");
|
---|
20 | case kuint_2 :
|
---|
21 | return ("uint_2");
|
---|
22 | case kint_2 :
|
---|
23 | return ("int_2");
|
---|
24 | case kint_4:
|
---|
25 | return ("int_4");
|
---|
26 | case kr_4 :
|
---|
27 | return ("r_4");
|
---|
28 | case kr_8 :
|
---|
29 | return ("r_8");
|
---|
30 | default :
|
---|
31 | return ("unknown");
|
---|
32 | }
|
---|
33 | }
|
---|
34 |
|
---|
35 | /* Nouvelle-Fonction */
|
---|
36 | const char * DataLongName(PBaseDataTypes typ)
|
---|
37 | {
|
---|
38 | switch (typ)
|
---|
39 | {
|
---|
40 | case kuint_1 :
|
---|
41 | return ("unsigned char (*1)");
|
---|
42 | case kint_1 :
|
---|
43 | return ("signed char (*1)");
|
---|
44 | case kuint_2 :
|
---|
45 | return ("unsigned short int (*2)");
|
---|
46 | case kint_2 :
|
---|
47 | return ("short int (*2)");
|
---|
48 | case kint_4:
|
---|
49 | return ("int (*4)");
|
---|
50 | case kr_4 :
|
---|
51 | return ("float (*4)");
|
---|
52 | case kr_8 :
|
---|
53 | return ("double (*8)");
|
---|
54 | default :
|
---|
55 | return ("unknown");
|
---|
56 | }
|
---|
57 | }
|
---|
58 |
|
---|
59 | /* Nouvelle-Fonction */
|
---|
60 | int DataSize(PBaseDataTypes typ)
|
---|
61 | {
|
---|
62 | switch (typ)
|
---|
63 | {
|
---|
64 | case kuint_1 :
|
---|
65 | return (sizeof(uint_1));
|
---|
66 | case kint_1 :
|
---|
67 | return (sizeof(int_1));
|
---|
68 | case kuint_2 :
|
---|
69 | return (sizeof(uint_2));
|
---|
70 | case kint_2 :
|
---|
71 | return (sizeof(int_2));
|
---|
72 | case kint_4:
|
---|
73 | return (sizeof(int_4));
|
---|
74 | case kr_4 :
|
---|
75 | return (sizeof(r_4));
|
---|
76 | case kr_8 :
|
---|
77 | return (sizeof(r_8));
|
---|
78 | default :
|
---|
79 | return (0);
|
---|
80 | }
|
---|
81 | }
|
---|
82 |
|
---|
83 |
|
---|
84 |
|
---|
Note:
See
TracBrowser
for help on using the repository browser.