chore: Remove unused finalizer calls

krlmlr · krlmlr · commit 819d63995a59 · 2025-11-02T11:50:27.000+01:00
diff --git a/R/make.R b/R/make.R
@@ -442,7 +442,6 @@ graph.lattice <- function(
     periodic <- rep(periodic, length(dimvector))
   }
 
-  on.exit(.Call(R_igraph_finalizer))
   res <- square_lattice_impl(
     dimvector = dimvector,
     nei = nei,
@@ -2002,7 +2001,6 @@ make_lattice <- function(
     periodic <- rep(periodic, length(dimvector))
   }
 
-  on.exit(.Call(R_igraph_finalizer))
   res <- square_lattice_impl(
     dimvector = dimvector,
     nei = nei,
diff --git a/R/structural-properties.R b/R/structural-properties.R
@@ -3385,7 +3385,6 @@ laplacian_matrix <- function(
   }
   sparse <- as.logical(sparse)
 
-  on.exit(.Call(R_igraph_finalizer))
   # Function call
   if (sparse) {
     res <- get_laplacian_sparse_impl(

Original file line number	Diff line number	Diff line change
`@@ -442,7 +442,6 @@ graph.lattice <- function(`
`442`	`442`	`periodic <- rep(periodic, length(dimvector))`
`443`	`443`	`}`
`444`	`444`
`445`		`- on.exit(.Call(R_igraph_finalizer))`
`446`	`445`	`res <- square_lattice_impl(`
`447`	`446`	`dimvector = dimvector,`
`448`	`447`	`nei = nei,`
`@@ -2002,7 +2001,6 @@ make_lattice <- function(`
`2002`	`2001`	`periodic <- rep(periodic, length(dimvector))`
`2003`	`2002`	`}`
`2004`	`2003`
`2005`		`- on.exit(.Call(R_igraph_finalizer))`
`2006`	`2004`	`res <- square_lattice_impl(`
`2007`	`2005`	`dimvector = dimvector,`
`2008`	`2006`	`nei = nei,`
Original file line number	Diff line number	Diff line change
`@@ -3385,7 +3385,6 @@ laplacian_matrix <- function(`
`3385`	`3385`	`}`
`3386`	`3386`	`sparse <- as.logical(sparse)`
`3387`	`3387`
`3388`		`- on.exit(.Call(R_igraph_finalizer))`
`3389`	`3388`	`# Function call`
`3390`	`3389`	`if (sparse) {`
`3391`	`3390`	`res <- get_laplacian_sparse_impl(`