;;; -*- lexical-binding: t -*-
;;
;; --------------------------------------------------------------------------------

(require 'luki-lisp)

;; --------------------------------------------------------------------------------

(defun last-char-of-string (str)
  (string-to-char (substring str -1)))

;; --------------------------------------------------------------------------------
;;
;;         ,---------------.
;;        ; `,-------------.`.
;;        :`;_-             `.
;;        : :_-   R. I. P.   :
;;        : :_-           .- ;
;;        :`:.-=============-.
;;        : :_-           `-.:
;;        : :_-  e-m-a-c-s   :
;;        : :_-  d-e-v-e-l   :
;;        : :_-              :
;;        : :_-     .-       :
;;        : :_-           .- :
;;        : :_-              :
;; -------: :_-    2024      :`------
;;  _______`:_______________,;________
;;  ``^`^`^`^`^`^`^`^`^`^`^`^`^`^`^`^`
;;
;; --------------------------------------------------------------------------------

(<- 'll-str)