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
42
43
|
/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* Copyright (C) 2001 Gerwin Klein <lsf@jflex.de> *
* Copyright (C) 2001 Bernhard Rumpe <rumpe@in.tum.de> *
* All rights reserved. *
* *
* License: BSD *
* *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
/**
* Symbol table entry for functions.
*
* Contains arity and reference to location of definition
*/
class STEfun extends SymtabEntry {
int arity;
Tdekl dekl; // location of definition
public STEfun(String f, Tdekl d, int a) {
super(f);
dekl=d;
arity=a;
}
public int kind() {
return SymtabEntry.FUN;
}
public String toString() {
return "function "+name+", arity "+arity;
}
public int arity() {
return arity;
}
public Tdekl getDekl() {
return dekl;
}
}
|
