← Back to branch summary

~ubuntu-branches/debian/squeeze/erlang/squeeze

« back to all changes in this revision

Viewing changes to erts/emulator/beam/erl_fun.h

  • Committer: Bazaar Package Importer
  • Author(s): Erlang Packagers, Sergei Golovan
  • Date: 2006-12-03 17:07:44 UTC
  • mfrom: (2.1.11 feisty)
  • Revision ID: james.westby@ubuntu.com-20061203170744-rghjwupacqlzs6kv
Tags: 1:11.b.2-4
[ Sergei Golovan ]
Fixed erlang-base and erlang-base-hipe prerm scripts.

Show diffs side-by-side

added added

removed removed

Lines of Context:
erts/emulator/beam/erl_fun.h
19
19
#ifndef __ERLFUNTABLE_H__
20
20
#define __ERLFUNTABLE_H__
21
21
 
22
 
extern Hash erts_fun_table;
 
22
#include "erl_smp.h"
23
23
 
24
24
/*
25
25
 * Fun entry.
40
40
 
41
41
    Uint arity;                 /* The arity of the fun. */
42
42
    Eterm module;               /* Tagged atom for module. */
43
 
    int refc;                   /* Reference count: One for code + one for each
 
43
    erts_refc_t refc;           /* Reference count: One for code + one for each
44
44
                                   fun object in each process. */
45
45
} ErlFunEntry;
46
46
 
52
52
 
53
53
typedef struct erl_fun_thing {
54
54
    Eterm thing_word;           /* Subtag FUN_SUBTAG. */
55
 
#ifndef SHARED_HEAP
 
55
#ifndef HYBRID /* FIND ME! */
56
56
    struct erl_fun_thing* next; /* Next fun in mso list. */
57
57
#endif
58
58
    ErlFunEntry* fe;            /* Pointer to fun entry. */
70
70
#define ERL_FUN_SIZE ((sizeof(ErlFunThing)/sizeof(Eterm))-1)
71
71
 
72
72
void erts_init_fun_table(void);
73
 
void erts_fun_info(CIO to);
 
73
void erts_fun_info(int, void *);
 
74
int erts_fun_table_sz(void);
74
75
 
75
76
ErlFunEntry* erts_put_fun_entry(Eterm mod, int uniq, int index);
76
77
ErlFunEntry* erts_get_fun_entry(Eterm mod, int uniq, int index);
77
 
ErlFunEntry* erts_put_debug_fun_entry(Eterm mod, byte* uniq, int index);
78
78
 
79
79
ErlFunEntry* erts_put_fun_entry2(Eterm mod, int old_uniq, int old_index,
80
80
                                byte* uniq, int index, int arity);
82
82
                                byte* uniq, int index, int arity);
83
83
 
84
84
void erts_erase_fun_entry(ErlFunEntry* fe);
85
 
#ifndef SHARED_HEAP
 
85
#ifndef HYBRID /* FIND ME! */
86
86
void erts_cleanup_funs(ErlFunThing* funp);
87
87
#endif
88
88
void erts_cleanup_funs_on_purge(Eterm* start, Eterm* end);
89
 
void erts_dump_fun_entries(CIO fd);
 
89
void erts_dump_fun_entries(int, void *);
90
90
 
91
91
#endif