Commit ⋅ hrbrmstr/tlsh

Showing 1 of 1 files from the diff.

@@ -6,6 +6,10 @@

Loading

#' @param x length 1 `character` or `raw` vector
#' @export
tlsh_simple_hash <- function(x) {
  if (is.na(x) | is.null(x)) {
    warning("Invalid byte stream")
    return(NA_character_)
  }
  if (inherits(x, "character")) {
    x <- x[1]
    if (nchar(x) < 50L) {

Files		•	•	Coverage
R	53	25	28	47.17%
src	453	254	199	56.07%
Project Totals (9 files)	506	279	227	55.14%

View CI Build Download

6	6		#' @param x length 1 `character` or `raw` vector
7	7		#' @export
8	8		tlsh_simple_hash <- function(x) {
	9	+	if (is.na(x) \| is.null(x)) {
	10	+	warning("Invalid byte stream")
	11	+	return(NA_character_)
	12	+	}
9	13		if (inherits(x, "character")) {
10	14		x <- x[1]
11	15		if (nchar(x) < 50L) {