File: gl_gen.hrl

package info (click to toggle)
erlang 1%3A19.2.1%2Bdfsg-2%2Bdeb9u3
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 175,856 kB
  • sloc: erlang: 1,414,205; xml: 397,681; ansic: 345,439; cpp: 51,554; makefile: 23,040; java: 11,480; sh: 10,128; lisp: 9,231; python: 4,853; pascal: 3,273; perl: 2,970; asm: 2,900; javascript: 700; tcl: 245; sed: 86
file content (41 lines) | stat: -rw-r--r-- 1,110 bytes parent folder | download | duplicates (15)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41

-record(func,
	{
	  name        = undefined, % real name
	  type        = void,      % method type
	  params      = [],        % arguments to the function
	  where       = both,      % C code and/or erlang
	  id          = undefined, % Integer
	  alt         = undefined, % Function alternative
	  ext         = undefined  % Have ARB or other extension
	 }
       ).

-record(arg,
	{
	  name    = undefined,
	  type    = undefined,
	  in      = true,
	  where   = both, % both in c and erl or only in either 
	  alt     = undefined
	 }).

-record(type,
	{
	  name     = undefined,  % typename
	  base     = undefined,  % basename int, char, float ..
	  size     = 4,          % in bytes
	  by_val   = true,       % or false = by_ref
	  single   = true,       % Single or array (list)
	  ref      = undefined,  % {pointer, N}
	  mod      = []          % const ...
	 }
       ).

-record(def, {name, val, type}).  %% type=hex, int, string

-define(error(What), 
	erlang:error({{?MODULE,?LINE},{get(current_func)},What})).

-define(warning(Str,Args),
	io:format("~p:~p Warning:"++Str, [?MODULE,?LINE] ++ Args)).