From 6b723363b891a3a72b20718864cae780c823ebda Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Sun, 15 Oct 2023 14:20:55 -0700
Subject: [PATCH] add some tests for rfind

---
 search.lua | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/search.lua b/search.lua
index c9af187..dab7e1f 100644
--- a/search.lua
+++ b/search.lua
@@ -141,3 +141,10 @@ function rfind(s, pat, i, plain)
   assert (endpos >= #pat)
   return endpos-#pat+1
 end
+
+function test_rfind()
+  check_eq(rfind('abc', 'c'), 3, 'final char')
+  check_eq(rfind('acbc', 'c', 3), 2, 'previous char')
+  check_nil(rfind('abc', 'd'), 'missing char')
+  check_nil(rfind('abc', 'c', 2), 'no more char')
+end