Rcpp interrupt on freq_to_stop_times for #89

UrbanAnalyst · Sep 29, 2022 · 0d6da36 · 0d6da36
1 parent 774e82a
commit 0d6da36
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: gtfsrouter
 Title: Routing with GTFS (General Transit Feed Specification) Data
-Version: 0.0.5.107
+Version: 0.0.5.108
 Authors@R: c(
     person("Mark", "Padgham", , "[email protected]", role = c("aut", "cre")),
     person("Marcin", "Stepniak", , "[email protected]", role = "aut",

diff --git a/codemeta.json b/codemeta.json
@@ -7,7 +7,7 @@
   "codeRepository": "https://github.com/ATFutures/gtfs-router",
   "issueTracker": "https://github.com/ATFutures/gtfs-router/issues",
   "license": "https://spdx.org/licenses/GPL-3.0",
-  "version": "0.0.5.107",
+  "version": "0.0.5.108",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",

diff --git a/src/freq_to_stop_times.cpp b/src/freq_to_stop_times.cpp
@@ -19,6 +19,8 @@ Rcpp::List rcpp_freq_to_stop_times (Rcpp::DataFrame frequencies,
 
     for (size_t i = 0; i < ntrips; i++)
     {
+        Rcpp::checkUserInterrupt ();
+
         const int headway = f_headway [i];
         const int start_time = f_start_time [i];
         const int end_time = f_end_time [i];