Showing 1 of 1 files from the diff.

@@ -6,6 +6,10 @@
Loading
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) {
Files Coverage
R 47.17%
src 56.07%
Project Totals (9 files) 55.14%