Skip to content

Commit df4f411

Browse files
authored
chore: Adapt handling of optional parameters to interface definition changes in the C core (#1567)
1 parent cc33ddc commit df4f411

5 files changed

Lines changed: 721 additions & 1168 deletions

File tree

R/aaa-auto.R

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -793,7 +793,7 @@ get_k_shortest_paths_impl <- function(graph, from, to, ..., k, weights=NULL, mod
793793
res
794794
}
795795

796-
get_widest_path_impl <- function(graph, from, to, weights, mode=c("out", "in", "all", "total")) {
796+
get_widest_path_impl <- function(graph, from, to, weights=NULL, mode=c("out", "in", "all", "total")) {
797797
# Argument checks
798798
ensure_igraph(graph)
799799
from <- as_igraph_vs(graph, from)
@@ -826,7 +826,7 @@ get_widest_path_impl <- function(graph, from, to, weights, mode=c("out", "in", "
826826
res
827827
}
828828

829-
get_widest_paths_impl <- function(graph, from, to=V(graph), weights, mode=c("out", "in", "all", "total")) {
829+
get_widest_paths_impl <- function(graph, from, to=V(graph), weights=NULL, mode=c("out", "in", "all", "total")) {
830830
# Argument checks
831831
ensure_igraph(graph)
832832
from <- as_igraph_vs(graph, from)
@@ -856,7 +856,7 @@ get_widest_paths_impl <- function(graph, from, to=V(graph), weights, mode=c("out
856856
res
857857
}
858858

859-
widest_path_widths_dijkstra_impl <- function(graph, from=V(graph), to=V(graph), weights, mode=c("out", "in", "all", "total")) {
859+
widest_path_widths_dijkstra_impl <- function(graph, from=V(graph), to=V(graph), weights=NULL, mode=c("out", "in", "all", "total")) {
860860
# Argument checks
861861
ensure_igraph(graph)
862862
from <- as_igraph_vs(graph, from)
@@ -878,7 +878,7 @@ widest_path_widths_dijkstra_impl <- function(graph, from=V(graph), to=V(graph),
878878
res
879879
}
880880

881-
widest_path_widths_floyd_warshall_impl <- function(graph, from=V(graph), to=V(graph), weights, mode=c("out", "in", "all", "total")) {
881+
widest_path_widths_floyd_warshall_impl <- function(graph, from=V(graph), to=V(graph), weights=NULL, mode=c("out", "in", "all", "total")) {
882882
# Argument checks
883883
ensure_igraph(graph)
884884
from <- as_igraph_vs(graph, from)

0 commit comments

Comments
 (0)