~rdoering/ubuntu/karmic/erlang/fix-535090

« back to all changes in this revision

Viewing changes to lib/typer/src/typer.hrl

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-02-15 16:42:52 UTC
  • mfrom: (3.1.2 squeeze)
  • Revision ID: james.westby@ubuntu.com-20090215164252-q5x4rcf8a5pbesb1
Tags: 1:12.b.5-dfsg-2
Upload to unstable after lenny is released.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
%% -*- erlang-indent-level: 2 -*-
2
 
%%--------------------------------------------------------------------
 
2
%%===========================================================================
3
3
%% File        : typer.hrl
4
 
%% Author      : Bingwen He <Bingwen.He@gmail.com>
 
4
%% Author      : Kostis Sagonas <kostis@it.uu.se>
5
5
%% Description : Header file for the typer application
6
 
%%--------------------------------------------------------------------
7
 
 
8
 
-include("dialyzer.hrl").  %% needed for some dialyzer records below
 
6
%%===========================================================================
 
7
 
 
8
-define(SHOW, show).
 
9
-define(SHOW_EXPORTED, show_exported).
 
10
-define(ANNOTATE, annotate).
 
11
-define(ANNOTATE_INC_FILES, annotate_inc_files).
 
12
 
 
13
-type mode() :: ?SHOW | ?SHOW_EXPORTED | ?ANNOTATE | ?ANNOTATE_INC_FILES.
 
14
 
 
15
%%
 
16
%% The following are needed for some dialyzer records below
 
17
%%
 
18
-include("dialyzer.hrl").
 
19
-include("dialyzer_callgraph.hrl").
9
20
 
10
21
%% XXX: The following appear here only temporarily
11
 
%-type(dict()                :: tuple()).
12
 
-type(dialyzer_plt()        :: tuple()).
13
 
-type(dialyzer_codeserver() :: tuple()).
 
22
%-type dict()                :: tuple().
 
23
-type dialyzer_plt()        :: tuple().
 
24
-type dialyzer_codeserver() :: tuple().
14
25
 
15
26
-record(typer_analysis,
16
 
        {mode            :: atom(),
 
27
        {mode            :: mode(),
17
28
         macros=[]       :: [{atom(),_}], % {macro_name, value}
18
29
         includes=[]     :: [string()],
19
30
         
20
31
         %% Esp for Dialyzer
21
32
         %% ----------------------
22
33
         code_server = dialyzer_codeserver:new() :: dialyzer_codeserver(),
23
 
         callgraph   = dialyzer_callgraph:new()  :: dialyzer_codeserver(),
 
34
         callgraph   = dialyzer_callgraph:new()  :: #dialyzer_callgraph{},
24
35
         ana_files       :: [string()],   % absolute filenames
25
36
         plt         = none                      :: 'none' | string(),
26
37