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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
// Verify the environment chain for Debugger.Object described in
// js/src/vm/EnvironmentObject.h.
// WithEnvironmentObject should be created if the script has direct eval,
// even if no binding is used outside of direct eval.
const g = newGlobal({newCompartment: true});
const dbg = new Debugger();
const gw = dbg.addDebuggee(g);
const bindings = {
bindings_prop: 61,
};
const envs = JSON.parse(gw.executeInGlobalWithBindings(`
eval('');
var qualified = 10;
unqualified = 20;
let lexical = 30;
this.prop = 40;
const envs = [];
let env = getInnerMostEnvironmentObject();
while (env) {
envs.push({
type: getEnvironmentObjectType(env) || "*global*",
qualified: !!Object.getOwnPropertyDescriptor(env, "qualified"),
unqualified: !!Object.getOwnPropertyDescriptor(env, "unqualified"),
lexical: !!Object.getOwnPropertyDescriptor(env, "lexical"),
prop: !!Object.getOwnPropertyDescriptor(env, "prop"),
});
env = getEnclosingEnvironmentObject(env);
}
JSON.stringify(envs);
`, bindings).return);
assertEq(envs.length, 3,
"WithEnvironmentObject should be created if the script has direct " +
"eval, even if no binding is used outside of direct eval");
let i = 0, env;
env = envs[i]; i++;
assertEq(env.type, "WithEnvironmentObject");
assertEq(env.qualified, false);
assertEq(env.unqualified, false);
assertEq(env.lexical, false);
assertEq(env.prop, false);
env = envs[i]; i++;
assertEq(env.type, "GlobalLexicalEnvironmentObject");
assertEq(env.qualified, false);
assertEq(env.unqualified, false);
assertEq(env.lexical, true, "lexical must live in the GlobalLexicalEnvironmentObject");
assertEq(env.prop, false);
env = envs[i]; i++;
assertEq(env.type, "*global*");
assertEq(env.qualified, true, "qualified var must live in the global");
assertEq(env.unqualified, true, "unqualified name must live in the global");
assertEq(env.lexical, false);
assertEq(env.prop, true, "this property must live in the global");
|
