(and-let* ((it (string-scan "aaa.el" ".elc" 'after))
           (it (string=? it "")))
  it)