loafle/openapi-generator
3
0
Fork 0
forked from loafle/openapi-generator-original
Code Pull Requests Activity

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

Browse Source
This commit is contained in:
William Cheng 2022-09-03 14:03:03 +08:00 committed by GitHub
parent b6576d1173
commit 2bfbb87862
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
89 changed files with 1691 additions and 1526 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
modules/openapi-generator/src/main/resources/r/api.mustache vendored
View File

@ -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.
#'

30
modules/openapi-generator/src/main/resources/r/modelAnyOf.mustache vendored
View File

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

28
modules/openapi-generator/src/main/resources/r/modelGeneric.mustache vendored
View File

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

29
modules/openapi-generator/src/main/resources/r/modelOneOf.mustache vendored
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/allof_tag_api_response.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/animal.R
View File

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

30
samples/client/petstore/R-httr2-wrapper/R/any_of_pig.R
View File

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

29
samples/client/petstore/R-httr2-wrapper/R/any_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/basque_pig.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/cat.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/cat_all_of.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/category.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/danish_pig.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/dog.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/dog_all_of.R
View File

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

2
samples/client/petstore/R-httr2-wrapper/R/fake_api.R
View File

@ -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.
#'

29
samples/client/petstore/R-httr2-wrapper/R/mammal.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/model_api_response.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/nested_one_of.R
View File

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

29
samples/client/petstore/R-httr2-wrapper/R/one_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/order.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/pet.R
View File

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

2
samples/client/petstore/R-httr2-wrapper/R/pet_api.R
View File

@ -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.
#'

29
samples/client/petstore/R-httr2-wrapper/R/pig.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/special.R
View File

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

2
samples/client/petstore/R-httr2-wrapper/R/store_api.R
View File

@ -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.
#'

28
samples/client/petstore/R-httr2-wrapper/R/tag.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/update_pet_request.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/user.R
View File

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

2
samples/client/petstore/R-httr2-wrapper/R/user_api.R
View File

@ -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.
#'

28
samples/client/petstore/R-httr2-wrapper/R/whale.R
View File

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

28
samples/client/petstore/R-httr2-wrapper/R/zebra.R
View File

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

6
samples/client/petstore/R-httr2-wrapper/test_petstore.R
View File

@ -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")

28
samples/client/petstore/R-httr2/R/allof_tag_api_response.R
View File

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

28
samples/client/petstore/R-httr2/R/animal.R
View File

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

30
samples/client/petstore/R-httr2/R/any_of_pig.R
View File

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

29
samples/client/petstore/R-httr2/R/any_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R-httr2/R/basque_pig.R
View File

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

28
samples/client/petstore/R-httr2/R/cat.R
View File

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

28
samples/client/petstore/R-httr2/R/cat_all_of.R
View File

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

28
samples/client/petstore/R-httr2/R/category.R
View File

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

28
samples/client/petstore/R-httr2/R/danish_pig.R
View File

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

28
samples/client/petstore/R-httr2/R/dog.R
View File

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

28
samples/client/petstore/R-httr2/R/dog_all_of.R
View File

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

2
samples/client/petstore/R-httr2/R/fake_api.R
View File

@ -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.
#'

29
samples/client/petstore/R-httr2/R/mammal.R
View File

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

28
samples/client/petstore/R-httr2/R/model_api_response.R
View File

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

28
samples/client/petstore/R-httr2/R/nested_one_of.R
View File

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

29
samples/client/petstore/R-httr2/R/one_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R-httr2/R/order.R
View File

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

28
samples/client/petstore/R-httr2/R/pet.R
View File

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

2
samples/client/petstore/R-httr2/R/pet_api.R
View File

@ -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.
#'

29
samples/client/petstore/R-httr2/R/pig.R
View File

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

28
samples/client/petstore/R-httr2/R/special.R
View File

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

2
samples/client/petstore/R-httr2/R/store_api.R
View File

@ -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.
#'

28
samples/client/petstore/R-httr2/R/tag.R
View File

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

28
samples/client/petstore/R-httr2/R/update_pet_request.R
View File

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

28
samples/client/petstore/R-httr2/R/user.R
View File

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

2
samples/client/petstore/R-httr2/R/user_api.R
View File

@ -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.
#'

28
samples/client/petstore/R-httr2/R/whale.R
View File

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

28
samples/client/petstore/R-httr2/R/zebra.R
View File

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

28
samples/client/petstore/R/R/allof_tag_api_response.R
View File

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

28
samples/client/petstore/R/R/animal.R
View File

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

30
samples/client/petstore/R/R/any_of_pig.R
View File

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

29
samples/client/petstore/R/R/any_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R/R/basque_pig.R
View File

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

28
samples/client/petstore/R/R/cat.R
View File

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

28
samples/client/petstore/R/R/cat_all_of.R
View File

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

28
samples/client/petstore/R/R/category.R
View File

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

28
samples/client/petstore/R/R/danish_pig.R
View File

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

28
samples/client/petstore/R/R/dog.R
View File

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

28
samples/client/petstore/R/R/dog_all_of.R
View File

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

2
samples/client/petstore/R/R/fake_api.R
View File

@ -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.
#'

29
samples/client/petstore/R/R/mammal.R
View File

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

28
samples/client/petstore/R/R/model_api_response.R
View File

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

28
samples/client/petstore/R/R/nested_one_of.R
View File

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

29
samples/client/petstore/R/R/one_of_primitive_type_test.R
View File

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

28
samples/client/petstore/R/R/order.R
View File

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

28
samples/client/petstore/R/R/pet.R
View File

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

2
samples/client/petstore/R/R/pet_api.R
View File

@ -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.
#'

29
samples/client/petstore/R/R/pig.R
View File

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

28
samples/client/petstore/R/R/special.R
View File

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

2
samples/client/petstore/R/R/store_api.R
View File

@ -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.
#'

28
samples/client/petstore/R/R/tag.R
View File

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

28
samples/client/petstore/R/R/update_pet_request.R
View File

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

28
samples/client/petstore/R/R/user.R
View File

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

2
samples/client/petstore/R/R/user_api.R
View File

@ -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.
#'

28
samples/client/petstore/R/R/whale.R
View File

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

28
samples/client/petstore/R/R/zebra.R
View File

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