2 ;;; $Id: tl-orig.el,v 1.2 1994/10/20 00:37:48 morioka Exp $
11 (defconst lc-ltn1 129)
18 "Return leading character of CHAR or LEADING-CHARACTER."
23 (defun string-width (str) (length str))
24 (defun char-bytes (chr) 1)
25 (defun char-width (chr) 1)