comparison R/scratch/bugfix.R @ 0:0cfcc391201f

initial from svn dyncall-1745
author Daniel Adler
date Thu, 19 Mar 2015 22:26:28 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:0cfcc391201f
1
2
3 x <- rdyncall:::makeNamespace("bla")
4 sys.source("/lab/eclipse/dyncall/rdyncall/scratch/script.R", envir=x)
5
6 quote({
7 parseStructInfos("
8 SDL_keysym{CiiS}scancode sym mod unicode ;
9 SDL_KeyboardEvent{CCC<SDL_keysym>}type which state keysym ;
10 ", envir=x)
11 })
12
13 f <- function()
14 {
15 parent.frame()
16 }
17
18 g <- function(envir=parent.frame())
19 {
20 envir
21 }
22
23 f <- function(envir=parent.frame())
24 {
25
26 }