Mercurial > pub > dyncall > bindings

annotate R/scratch/bugfix.R @ 29:6cc2b7fc7ea2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bigger pydc update: - cleanups and refactoring - python 2 fixes in var conversions (especially w/ respect to int vs long) - fix to pydc.free() which didn't work at all - fix to return python bool as actual bool - test lib covering all conversions (manual verification, though :-/)
author Tassilo Philipp
date Wed, 08 Apr 2020 22:17:43 +0200
parents 0cfcc391201f
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
1
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
2
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
3 x <- rdyncall:::makeNamespace("bla")
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
4 sys.source("/lab/eclipse/dyncall/rdyncall/scratch/script.R", envir=x)
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
5
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
6 quote({
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
7 parseStructInfos("
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
8 SDL_keysym{CiiS}scancode sym mod unicode ;
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
9 SDL_KeyboardEvent{CCC<SDL_keysym>}type which state keysym ;
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
10 ", envir=x)
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
11 })
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
12
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
13 f <- function()
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
14 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
15 parent.frame()
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
16 }
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
17
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
18 g <- function(envir=parent.frame())
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
19 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
20 envir
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
21 }
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
22
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
23 f <- function(envir=parent.frame())
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
24 {
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
25
0cfcc391201f initial from svn dyncall-1745
Daniel Adler
parents:
diff changeset
26 }