author | amurillo |
Wed, 14 Sep 2016 11:22:39 -0700 | |
changeset 40970 | 2ea624c0ae04 |
parent 31925 | 85c87bc2f1f3 |
permissions | -rw-r--r-- |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
1 |
/* |
31925 | 2 |
* Copyright (c) 2015, Oracle and/or its affiliates. All rights reserved. |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
3 |
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
31925 | 4 |
* |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
5 |
* This code is free software; you can redistribute it and/or modify it |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
6 |
* under the terms of the GNU General Public License version 2 only, as |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
7 |
* published by the Free Software Foundation. |
31925 | 8 |
* |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
9 |
* This code is distributed in the hope that it will be useful, but WITHOUT |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
10 |
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
11 |
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
12 |
* version 2 for more details (a copy is included in the LICENSE file that |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
13 |
* accompanied this code). |
31925 | 14 |
* |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
15 |
* You should have received a copy of the GNU General Public License version |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
16 |
* 2 along with this work; if not, write to the Free Software Foundation, |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
17 |
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
31925 | 18 |
* |
31192
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
19 |
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
20 |
* or visit www.oracle.com if you need additional information or have any |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
21 |
* questions. |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
22 |
*/ |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
23 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
24 |
/** |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
25 |
* JDK-8087211: Indirect evals should be strict with -strict option |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
26 |
* Make sure without -strict option, indirect evals are not strict. |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
27 |
* |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
28 |
* @test |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
29 |
* @run |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
30 |
*/ |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
31 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
32 |
var global = this; |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
33 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
34 |
// indirect eval call. |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
35 |
global.eval("x = 34;"); |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
36 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
37 |
function teststrict() { |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
38 |
"use strict"; |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
39 |
// strict caller, indirect eval. |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
40 |
global.eval('public = 1;'); |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
41 |
} |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
42 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
43 |
teststrict(); |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
44 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
45 |
function testnonstrict() { |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
46 |
// non strict caller, indirect eval. |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
47 |
global.eval('public = 1;'); |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
48 |
} |
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
49 |
|
1e019aeea9b5
8087211: Indirect evals should be strict with -strict option
sundar
parents:
diff
changeset
|
50 |
testnonstrict(); |