move print to public method, leave commented code to lock, unlock the class (#13342)

modules/openapi-generator/src/main/resources/r/api.mustache

@@ -2,7 +2,7 @@
 {{#operations}}
 #' @docType class
 #' @title {{baseName}} operations
-#' @description {{{description}}}
+#' @description {{{description}}}{{^description}}{{{classname}}}{{/description}}
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

modules/openapi-generator/src/main/resources/r/modelAnyOf.mustache

@@ -151,26 +151,28 @@
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#{{classname}}$unlock()
-{{classname}}$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#{{classname}}$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#{{classname}}$lock()
-{{classname}}$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-{{classname}}$lock()
-

modules/openapi-generator/src/main/resources/r/modelGeneric.mustache

@@ -526,25 +526,27 @@
       {{/hasValidation}}
       {{/allVars}}
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#{{classname}}$unlock()
-{{classname}}$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#{{classname}}$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#{{classname}}$lock()
-{{classname}}$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-{{classname}}$lock()

modules/openapi-generator/src/main/resources/r/modelOneOf.mustache

@@ -199,25 +199,28 @@
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#{{classname}}$unlock()
-{{classname}}$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#{{classname}}$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#{{classname}}$lock()
-{{classname}}$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-{{classname}}$lock()

samples/client/petstore/R-httr2-wrapper/R/allof_tag_api_response.R

@@ -260,26 +260,28 @@ AllofTagApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AllofTagApiResponse$unlock()
-AllofTagApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AllofTagApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AllofTagApiResponse$lock()
-AllofTagApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AllofTagApiResponse$lock()
 

samples/client/petstore/R-httr2-wrapper/R/animal.R

@@ -207,26 +207,28 @@ Animal <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Animal$unlock()
-Animal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Animal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Animal$lock()
-Animal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Animal$lock()
 

samples/client/petstore/R-httr2-wrapper/R/any_of_pig.R

@@ -156,27 +156,29 @@ AnyOfPig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPig$unlock()
-AnyOfPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPig$lock()
-AnyOfPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPig$lock()
-
 

samples/client/petstore/R-httr2-wrapper/R/any_of_primitive_type_test.R

@@ -174,26 +174,29 @@ AnyOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPrimitiveTypeTest$unlock()
-AnyOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPrimitiveTypeTest$lock()
-AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R-httr2-wrapper/R/basque_pig.R

@@ -223,26 +223,28 @@ BasquePig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#BasquePig$unlock()
-BasquePig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#BasquePig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#BasquePig$lock()
-BasquePig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-BasquePig$lock()
 

samples/client/petstore/R-httr2-wrapper/R/cat.R

@@ -231,26 +231,28 @@ Cat <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Cat$unlock()
-Cat$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Cat$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Cat$lock()
-Cat$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Cat$lock()
 

samples/client/petstore/R-httr2-wrapper/R/cat_all_of.R

@@ -168,26 +168,28 @@ CatAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#CatAllOf$unlock()
-CatAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#CatAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#CatAllOf$lock()
-CatAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-CatAllOf$lock()
 

samples/client/petstore/R-httr2-wrapper/R/category.R

@@ -199,26 +199,28 @@ Category <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Category$unlock()
-Category$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Category$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Category$lock()
-Category$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Category$lock()
 

samples/client/petstore/R-httr2-wrapper/R/danish_pig.R

@@ -223,26 +223,28 @@ DanishPig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DanishPig$unlock()
-DanishPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DanishPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DanishPig$lock()
-DanishPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DanishPig$lock()
 

samples/client/petstore/R-httr2-wrapper/R/dog.R

@@ -231,26 +231,28 @@ Dog <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Dog$unlock()
-Dog$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Dog$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Dog$lock()
-Dog$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Dog$lock()
 

samples/client/petstore/R-httr2-wrapper/R/dog_all_of.R

@@ -168,26 +168,28 @@ DogAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DogAllOf$unlock()
-DogAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DogAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DogAllOf$lock()
-DogAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DogAllOf$lock()
 

samples/client/petstore/R-httr2-wrapper/R/fake_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Fake operations
-#' @description 
+#' @description FakeApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2-wrapper/R/mammal.R

@@ -195,26 +195,29 @@ Mammal <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Mammal$unlock()
-Mammal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Mammal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Mammal$lock()
-Mammal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Mammal$lock()
 

samples/client/petstore/R-httr2-wrapper/R/model_api_response.R

@@ -214,26 +214,28 @@ ModelApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#ModelApiResponse$unlock()
-ModelApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#ModelApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#ModelApiResponse$lock()
-ModelApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-ModelApiResponse$lock()
 

samples/client/petstore/R-httr2-wrapper/R/nested_one_of.R

@@ -193,26 +193,28 @@ NestedOneOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#NestedOneOf$unlock()
-NestedOneOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#NestedOneOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#NestedOneOf$lock()
-NestedOneOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-NestedOneOf$lock()
 

samples/client/petstore/R-httr2-wrapper/R/one_of_primitive_type_test.R

@@ -174,26 +174,29 @@ OneOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#OneOfPrimitiveTypeTest$unlock()
-OneOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#OneOfPrimitiveTypeTest$lock()
-OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-OneOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R-httr2-wrapper/R/order.R

@@ -283,26 +283,28 @@ Order <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Order$unlock()
-Order$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Order$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Order$lock()
-Order$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Order$lock()
 

samples/client/petstore/R-httr2-wrapper/R/pet.R

@@ -320,26 +320,28 @@ Pet <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pet$unlock()
-Pet$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pet$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pet$lock()
-Pet$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pet$lock()
 

samples/client/petstore/R-httr2-wrapper/R/pet_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Pet operations
-#' @description 
+#' @description PetApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2-wrapper/R/pig.R

@@ -195,26 +195,29 @@ Pig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pig$unlock()
-Pig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pig$lock()
-Pig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pig$lock()
 

samples/client/petstore/R-httr2-wrapper/R/special.R

@@ -283,26 +283,28 @@ Special <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Special$unlock()
-Special$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Special$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Special$lock()
-Special$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Special$lock()
 

samples/client/petstore/R-httr2-wrapper/R/store_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Store operations
-#' @description 
+#' @description StoreApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2-wrapper/R/tag.R

@@ -191,26 +191,28 @@ Tag <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Tag$unlock()
-Tag$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Tag$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Tag$lock()
-Tag$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Tag$lock()
 

samples/client/petstore/R-httr2-wrapper/R/update_pet_request.R

@@ -192,26 +192,28 @@ UpdatePetRequest <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#UpdatePetRequest$unlock()
-UpdatePetRequest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#UpdatePetRequest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#UpdatePetRequest$lock()
-UpdatePetRequest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-UpdatePetRequest$lock()
 

samples/client/petstore/R-httr2-wrapper/R/user.R

@@ -329,26 +329,28 @@ User <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#User$unlock()
-User$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#User$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#User$lock()
-User$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-User$lock()
 

samples/client/petstore/R-httr2-wrapper/R/user_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title User operations
-#' @description 
+#' @description UserApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2-wrapper/R/whale.R

@@ -230,26 +230,28 @@ Whale <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Whale$unlock()
-Whale$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Whale$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Whale$lock()
-Whale$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Whale$lock()
 

samples/client/petstore/R-httr2-wrapper/R/zebra.R

@@ -207,26 +207,28 @@ Zebra <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Zebra$unlock()
-Zebra$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Zebra$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Zebra$lock()
-Zebra$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Zebra$lock()
 

samples/client/petstore/R-httr2-wrapper/test_petstore.R

@@ -9,8 +9,10 @@ t$additional_properties <- c("abc" = 849, "array" = list('a', 'b', 'c'))
 t$additional_properties
 t$additional_properties["abc"]
 t$additional_properties["array"]
-print(t$toJSON())
+
-print(t$toJSONString())
+print(t)
+#print(t$toJSON())
+#print(t$toJSONString())
 
 print("done tag")
 

samples/client/petstore/R-httr2/R/allof_tag_api_response.R

@@ -227,26 +227,28 @@ AllofTagApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AllofTagApiResponse$unlock()
-AllofTagApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AllofTagApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AllofTagApiResponse$lock()
-AllofTagApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AllofTagApiResponse$lock()
 

samples/client/petstore/R-httr2/R/animal.R

@@ -174,26 +174,28 @@ Animal <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Animal$unlock()
-Animal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Animal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Animal$lock()
-Animal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Animal$lock()
 

samples/client/petstore/R-httr2/R/any_of_pig.R

@@ -156,27 +156,29 @@ AnyOfPig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPig$unlock()
-AnyOfPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPig$lock()
-AnyOfPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPig$lock()
-
 

samples/client/petstore/R-httr2/R/any_of_primitive_type_test.R

@@ -174,26 +174,29 @@ AnyOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPrimitiveTypeTest$unlock()
-AnyOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPrimitiveTypeTest$lock()
-AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R-httr2/R/basque_pig.R

@@ -190,26 +190,28 @@ BasquePig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#BasquePig$unlock()
-BasquePig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#BasquePig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#BasquePig$lock()
-BasquePig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-BasquePig$lock()
 

samples/client/petstore/R-httr2/R/cat.R

@@ -198,26 +198,28 @@ Cat <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Cat$unlock()
-Cat$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Cat$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Cat$lock()
-Cat$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Cat$lock()
 

samples/client/petstore/R-httr2/R/cat_all_of.R

@@ -135,26 +135,28 @@ CatAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#CatAllOf$unlock()
-CatAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#CatAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#CatAllOf$lock()
-CatAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-CatAllOf$lock()
 

samples/client/petstore/R-httr2/R/category.R

@@ -166,26 +166,28 @@ Category <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Category$unlock()
-Category$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Category$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Category$lock()
-Category$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Category$lock()
 

samples/client/petstore/R-httr2/R/danish_pig.R

@@ -190,26 +190,28 @@ DanishPig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DanishPig$unlock()
-DanishPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DanishPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DanishPig$lock()
-DanishPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DanishPig$lock()
 

samples/client/petstore/R-httr2/R/dog.R

@@ -198,26 +198,28 @@ Dog <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Dog$unlock()
-Dog$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Dog$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Dog$lock()
-Dog$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Dog$lock()
 

samples/client/petstore/R-httr2/R/dog_all_of.R

@@ -135,26 +135,28 @@ DogAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DogAllOf$unlock()
-DogAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DogAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DogAllOf$lock()
-DogAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DogAllOf$lock()
 

samples/client/petstore/R-httr2/R/fake_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Fake operations
-#' @description 
+#' @description FakeApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2/R/mammal.R

@@ -172,26 +172,29 @@ Mammal <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Mammal$unlock()
-Mammal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Mammal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Mammal$lock()
-Mammal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Mammal$lock()
 

samples/client/petstore/R-httr2/R/model_api_response.R

@@ -181,26 +181,28 @@ ModelApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#ModelApiResponse$unlock()
-ModelApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#ModelApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#ModelApiResponse$lock()
-ModelApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-ModelApiResponse$lock()
 

samples/client/petstore/R-httr2/R/nested_one_of.R

@@ -160,26 +160,28 @@ NestedOneOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#NestedOneOf$unlock()
-NestedOneOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#NestedOneOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#NestedOneOf$lock()
-NestedOneOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-NestedOneOf$lock()
 

samples/client/petstore/R-httr2/R/one_of_primitive_type_test.R

@@ -174,26 +174,29 @@ OneOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#OneOfPrimitiveTypeTest$unlock()
-OneOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#OneOfPrimitiveTypeTest$lock()
-OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-OneOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R-httr2/R/order.R

@@ -250,26 +250,28 @@ Order <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Order$unlock()
-Order$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Order$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Order$lock()
-Order$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Order$lock()
 

samples/client/petstore/R-httr2/R/pet.R

@@ -287,26 +287,28 @@ Pet <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pet$unlock()
-Pet$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pet$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pet$lock()
-Pet$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pet$lock()
 

samples/client/petstore/R-httr2/R/pet_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Pet operations
-#' @description 
+#' @description PetApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2/R/pig.R

@@ -172,26 +172,29 @@ Pig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pig$unlock()
-Pig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pig$lock()
-Pig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pig$lock()
 

samples/client/petstore/R-httr2/R/special.R

@@ -250,26 +250,28 @@ Special <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Special$unlock()
-Special$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Special$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Special$lock()
-Special$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Special$lock()
 

samples/client/petstore/R-httr2/R/store_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Store operations
-#' @description 
+#' @description StoreApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2/R/tag.R

@@ -158,26 +158,28 @@ Tag <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Tag$unlock()
-Tag$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Tag$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Tag$lock()
-Tag$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Tag$lock()
 

samples/client/petstore/R-httr2/R/update_pet_request.R

@@ -159,26 +159,28 @@ UpdatePetRequest <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#UpdatePetRequest$unlock()
-UpdatePetRequest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#UpdatePetRequest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#UpdatePetRequest$lock()
-UpdatePetRequest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-UpdatePetRequest$lock()
 

samples/client/petstore/R-httr2/R/user.R

@@ -296,26 +296,28 @@ User <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#User$unlock()
-User$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#User$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#User$lock()
-User$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-User$lock()
 

samples/client/petstore/R-httr2/R/user_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title User operations
-#' @description 
+#' @description UserApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R-httr2/R/whale.R

@@ -197,26 +197,28 @@ Whale <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Whale$unlock()
-Whale$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Whale$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Whale$lock()
-Whale$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Whale$lock()
 

samples/client/petstore/R-httr2/R/zebra.R

@@ -174,26 +174,28 @@ Zebra <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Zebra$unlock()
-Zebra$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Zebra$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Zebra$lock()
-Zebra$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Zebra$lock()
 

samples/client/petstore/R/R/allof_tag_api_response.R

@@ -260,26 +260,28 @@ AllofTagApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AllofTagApiResponse$unlock()
-AllofTagApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AllofTagApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AllofTagApiResponse$lock()
-AllofTagApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AllofTagApiResponse$lock()
 

samples/client/petstore/R/R/animal.R

@@ -207,26 +207,28 @@ Animal <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Animal$unlock()
-Animal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Animal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Animal$lock()
-Animal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Animal$lock()
 

samples/client/petstore/R/R/any_of_pig.R

@@ -156,27 +156,29 @@ AnyOfPig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPig$unlock()
-AnyOfPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPig$lock()
-AnyOfPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPig$lock()
-
 

samples/client/petstore/R/R/any_of_primitive_type_test.R

@@ -174,26 +174,29 @@ AnyOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#AnyOfPrimitiveTypeTest$unlock()
-AnyOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#AnyOfPrimitiveTypeTest$lock()
-AnyOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-AnyOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R/R/basque_pig.R

@@ -223,26 +223,28 @@ BasquePig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#BasquePig$unlock()
-BasquePig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#BasquePig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#BasquePig$lock()
-BasquePig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-BasquePig$lock()
 

samples/client/petstore/R/R/cat.R

@@ -231,26 +231,28 @@ Cat <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Cat$unlock()
-Cat$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Cat$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Cat$lock()
-Cat$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Cat$lock()
 

samples/client/petstore/R/R/cat_all_of.R

@@ -168,26 +168,28 @@ CatAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#CatAllOf$unlock()
-CatAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#CatAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#CatAllOf$lock()
-CatAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-CatAllOf$lock()
 

samples/client/petstore/R/R/category.R

@@ -199,26 +199,28 @@ Category <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Category$unlock()
-Category$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Category$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Category$lock()
-Category$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Category$lock()
 

samples/client/petstore/R/R/danish_pig.R

@@ -223,26 +223,28 @@ DanishPig <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DanishPig$unlock()
-DanishPig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DanishPig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DanishPig$lock()
-DanishPig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DanishPig$lock()
 

samples/client/petstore/R/R/dog.R

@@ -231,26 +231,28 @@ Dog <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Dog$unlock()
-Dog$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Dog$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Dog$lock()
-Dog$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Dog$lock()
 

samples/client/petstore/R/R/dog_all_of.R

@@ -168,26 +168,28 @@ DogAllOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#DogAllOf$unlock()
-DogAllOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#DogAllOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#DogAllOf$lock()
-DogAllOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-DogAllOf$lock()
 

samples/client/petstore/R/R/fake_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Fake operations
-#' @description 
+#' @description FakeApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R/R/mammal.R

@@ -172,26 +172,29 @@ Mammal <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Mammal$unlock()
-Mammal$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Mammal$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Mammal$lock()
-Mammal$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Mammal$lock()
 

samples/client/petstore/R/R/model_api_response.R

@@ -214,26 +214,28 @@ ModelApiResponse <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#ModelApiResponse$unlock()
-ModelApiResponse$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#ModelApiResponse$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#ModelApiResponse$lock()
-ModelApiResponse$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-ModelApiResponse$lock()
 

samples/client/petstore/R/R/nested_one_of.R

@@ -193,26 +193,28 @@ NestedOneOf <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#NestedOneOf$unlock()
-NestedOneOf$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#NestedOneOf$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#NestedOneOf$lock()
-NestedOneOf$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-NestedOneOf$lock()
 

samples/client/petstore/R/R/one_of_primitive_type_test.R

@@ -174,26 +174,29 @@ OneOfPrimitiveTypeTest <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#OneOfPrimitiveTypeTest$unlock()
-OneOfPrimitiveTypeTest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#OneOfPrimitiveTypeTest$lock()
-OneOfPrimitiveTypeTest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-OneOfPrimitiveTypeTest$lock()
 

samples/client/petstore/R/R/order.R

@@ -283,26 +283,28 @@ Order <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Order$unlock()
-Order$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Order$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Order$lock()
-Order$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Order$lock()
 

samples/client/petstore/R/R/pet.R

@@ -320,26 +320,28 @@ Pet <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pet$unlock()
-Pet$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pet$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pet$lock()
-Pet$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pet$lock()
 

samples/client/petstore/R/R/pet_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Pet operations
-#' @description 
+#' @description PetApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R/R/pig.R

@@ -172,26 +172,29 @@ Pig <- R6::R6Class(
       )
       jsoncontent <- paste(jsoncontent, collapse = ",")
       as.character(jsonlite::prettify(paste("{", jsoncontent, "}", sep = "")))
+    },
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
     }
   ),
   # Lock the class to prevent modifications to the method or field
   lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Pig$unlock()
-Pig$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Pig$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Pig$lock()
-Pig$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Pig$lock()
 

samples/client/petstore/R/R/special.R

@@ -283,26 +283,28 @@ Special <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Special$unlock()
-Special$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Special$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Special$lock()
-Special$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Special$lock()
 

samples/client/petstore/R/R/store_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title Store operations
-#' @description 
+#' @description StoreApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R/R/tag.R

@@ -191,26 +191,28 @@ Tag <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Tag$unlock()
-Tag$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Tag$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Tag$lock()
-Tag$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Tag$lock()
 

samples/client/petstore/R/R/update_pet_request.R

@@ -192,26 +192,28 @@ UpdatePetRequest <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#UpdatePetRequest$unlock()
-UpdatePetRequest$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#UpdatePetRequest$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#UpdatePetRequest$lock()
-UpdatePetRequest$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-UpdatePetRequest$lock()
 

samples/client/petstore/R/R/user.R

@@ -329,26 +329,28 @@ User <- R6::R6Class(
     getInvalidFields = function() {
       invalid_fields <- list()
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#User$unlock()
-User$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#User$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#User$lock()
-User$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-User$lock()
 

samples/client/petstore/R/R/user_api.R

@@ -7,7 +7,7 @@
 #'
 #' @docType class
 #' @title User operations
-#' @description 
+#' @description UserApi
 #' @format An \code{R6Class} generator object
 #' @field api_client Handles the client-server communication.
 #'

samples/client/petstore/R/R/whale.R

@@ -230,26 +230,28 @@ Whale <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Whale$unlock()
-Whale$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Whale$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Whale$lock()
-Whale$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Whale$lock()
 

samples/client/petstore/R/R/zebra.R

@@ -207,26 +207,28 @@ Zebra <- R6::R6Class(
       }
 
       invalid_fields
-    }
+    },
-  ),
+    #' Print the object
+    #'
+    #' @description
+    #' Print the object
+    #'
+    #' @export
+    print = function() {
+      print(jsonlite::prettify(self$toJSONString()))
+      invisible(self)
+    }),
     # Lock the class to prevent modifications to the method or field
     lock_class = TRUE
 )
-
+## Uncomment below to unlock the class to allow modifications of the method or field
-# Unlock the class to allow modifications of the method or field
+#Zebra$unlock()
-Zebra$unlock()
+#
-
+## Below is an example to define the print fnuction
-#' Print the object
+#Zebra$set("public", "print", function(...) {
-#'
+#  print(jsonlite::prettify(self$toJSONString()))
-#' @description
+#  invisible(self)
-#' Print the object
+#})
-#'
+## Uncomment below to lock the class to prevent modifications to the method or field
-#' @export
+#Zebra$lock()
-Zebra$set("public", "print", function(...) {
-  print(jsonlite::prettify(self$toJSONString()))
-  invisible(self)
-})
-
-# Lock the class to prevent modifications to the method or field
-Zebra$lock()