elisp 函数 string-match 没有从后向前查找的版本,如何破?

比如

(string-match (regexp-quote str1) str2)

我能想到的一个解决方案就是

(string-match (regexp-quote (nreverse str1)) (nreverse str2))

为什么需要从后向前查找的版本