Sign in
third-party-mirror
/
R
/
484af647dc960a6396d63529b07964d9b3b59f51
/
.
/
src
/
library
/
compiler
/
tests
/
jit.R
blob: 0b6262e55358951ef65be750a844ebfd82a8d37e [
file
] [
log
] [
blame
]
library
(
compiler
)
oldJIT
<-
enableJIT
(
3
)
## need a test of level 1 to make sure functions are compiled
## need more tests here
repeat
{
break
}
while
(
TRUE
)
break
for
(
i
in
1
:
10
)
i
enableJIT
(
oldJIT
)