~ubuntu-branches/ubuntu/utopic/adios/utopic

« back to all changes in this revision

Viewing changes to .pc/debian_paths.patch/utils/gpp/type_mapper.py

  • Committer: Package Import Robot
  • Author(s): Alastair McKinstry
  • Date: 2013-12-09 15:21:31 UTC
  • mfrom: (1.1.2)
  • Revision ID: package-import@ubuntu.com-20131209152131-jtd4fpmdv3xnunnm
Tags: 1.5.0-1
* New upstream.
* Standards-Version: 3.9.5
* Include latest config.{sub,guess} 
* New watch file.
* Create libadios-bin for binaries.

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
 
 
2
 
 
3
c_types = {
 
4
    'string' : 'string',
 
5
    'byte' : 'unsigned char',
 
6
    'integer*1' : 'char',
 
7
    'short' : 'short',
 
8
    'integer*2' : 'short',
 
9
    'integer' : 'int',
 
10
    'integer*4' : 'int',
 
11
    'long' : 'long',
 
12
    'integer*8' : 'long',
 
13
    'unsigned byte' : 'unsigned byte',
 
14
    'unsigned integer*1' : 'unsigned byte',
 
15
    'unsigned short' : 'unsigned short',
 
16
    'unsigned integer*2' : 'unsigned short',
 
17
    'unsigned integer' : 'unsigned integer',
 
18
    'unsigned integer*4' : 'unsigned integer',
 
19
    'unsigned long' : 'unsigned long',
 
20
    'unsigned integer*8' : 'unsigned long',
 
21
    'float' : 'float',
 
22
    'real' : 'float',
 
23
    'real*4' : 'float',
 
24
    'unsigned float' : 'unsigned float',
 
25
    'unsigned real' : 'unsigned float',
 
26
    'unsigned real*4' : 'unsigned float',
 
27
    'double' : 'double',
 
28
    'real*8' : 'double',
 
29
    'unsigned double' : 'unsigned double',
 
30
    'unsigned real*8' : 'unsigned double',
 
31
    'complex' : 'complex',
 
32
    'double complex' : 'double complex'
 
33
}
 
34
 
 
35
fortran_types = {
 
36
    'string' : 'string',
 
37
    'byte' : 'integer*1',
 
38
    'integer*1' : 'integer*1',
 
39
    'short' : 'integer*2',
 
40
    'integer*2' : 'integer*2',
 
41
    'integer' : 'integer*4',
 
42
    'integer*4' : 'integer*4',
 
43
    'long' : 'integer*8',
 
44
    'integer*8' : 'integer*8',
 
45
    'unsigned byte' : 'unsigned integer*1',
 
46
    'unsigned integer*1' : 'unsigned integer*1',
 
47
    'unsigned short' : 'unsigned integer*2',
 
48
    'unsigned integer*2' : 'unsigned integer*2',
 
49
    'unsigned integer' : 'unsigned integer*4',
 
50
    'unsigned integer*4' : 'unsigned integer*4',
 
51
    'unsigned long' : 'unsigned integer*8',
 
52
    'unsigned integer*8' : 'unsigned integer*8',
 
53
    'float' : 'real*4',
 
54
    'real' : 'real*4',
 
55
    'real*4' : 'real*4',
 
56
    'unsigned float' : 'unsigned real*4',
 
57
    'unsigned real' : 'unsigned real*4',
 
58
    'unsigned real*4' : 'unsigned real*4',
 
59
    'double' : 'real*8',
 
60
    'real*8' : 'real*8',
 
61
    'unsigned double' : 'unsigned real*8',
 
62
    'unsigned real*8' : 'unsigned real*8',
 
63
    'complex' : 'complex',
 
64
    'double complex' : 'double complex'
 
65
}
 
66
 
 
67
type_sizes = {
 
68
    'string' : 1,
 
69
    'byte' : 1,
 
70
    'integer*1' : 1,
 
71
    'short' : 2,
 
72
    'integer*2' : 2,
 
73
    'integer' : 4,
 
74
    'integer*4' : 4,
 
75
    'long' : 8,
 
76
    'integer*8' : 8,
 
77
    'unsigned byte' : 1,
 
78
    'unsigned integer*1' : 1,
 
79
    'unsigned short' : 2,
 
80
    'unsigned integer*2' : 2,
 
81
    'unsigned integer' : 4,
 
82
    'unsigned integer*4' : 4,
 
83
    'unsigned long' : 8,
 
84
    'unsigned integer*8' : 8,
 
85
    'float' : 4,
 
86
    'real' : 4,
 
87
    'real*4' : 4,
 
88
    'unsigned float' : 4,
 
89
    'unsigned real' : 4,
 
90
    'unsigned real*4' : 4,
 
91
    'double' : 8,
 
92
    'real*8' : 8,
 
93
    'unsigned double' : 8,
 
94
    'unsigned real*8' : 8,
 
95
    'complex' : 8,
 
96
    'double complex' : 16
 
97
}
 
98
 
 
99
def get_c_type (parsed_type):
 
100
    return c_types [parsed_type]
 
101
 
 
102
def get_fortran_type (parsed_type):
 
103
    return fortran_types [parsed_type]
 
104
 
 
105
def get_size (parsed_type):
 
106
    return type_sizes [parsed_type]
 
107
 
 
108