diff --git a/R/read_in_utils.R b/R/read_in_utils.R
index 11add850e852058ed7335a3ac1f2219b6a998792..af6e5269582b891e28954f6b7ab1a36e05ecda53 100644
--- a/R/read_in_utils.R
+++ b/R/read_in_utils.R
@@ -270,7 +270,11 @@ order_parameters <- function(parameters, class_name){
 
         for(i in seq_len(length(parameters))){
             # cat("\n", names(parameters)[[i]], "\n")
-            assertthat::assert_that(names(parameters)[[i]] %in% class_args)
+            assertthat::assert_that(names(parameters)[[i]] %in% class_args,
+                                    msg = paste0(names(parameters)[[i]],
+                                                 " not in class_args of class ",
+                                                 class_name,
+                                                 collapse = " "))
         }
     }