view R/scratch/dynport_dyp.R @ 66:7a61dd082341 default tip

pydc: - fix double free triggered by capsule destructor, when freeing pydc and callback objects, manually
author Tassilo Philipp
date Fri, 24 May 2024 18:16:29 +0200
parents 0cfcc391201f
children
line wrap: on
line source

#
# 1. install functions
# 2. install function variables
# 3. install enums
# 4. install defines
#



begin.info <- function()
{  
}

begin.funs <- function()
{
  
}

parse.funs <- function(line)
{
    
}


parse <- function(path)
{
  file <- file(path)
  eof  <- FALSE
  while(!eof)
  {
    line <- readLines(file, 1)
  }
}

parse("rdyncall/scratch/test.dyp")

currentSection <- ""


if ( substr(line, 1, 1) == "!" ) {
  paste("end.", currentSection)
  do.call( paste("end.", currentSection, sep="") )
  type <- substr(line,2)
  handler <- paste("begin.",type,sep="")
  envs <- find(handler)
  if (length(envs) == 1)
    do.call(handler)
  }
}