(x-font-regexp-weight-subnum, x-font-regexp-slant-subnum)

(x-font-regexp-swidth-subnum, x-font-regexp-adstyle-subnum): Defconst.

diff --git a/lisp/faces.el b/lisp/faces.el
index 4b4896d2a4c1c79d15f19d49d2131f0f26aa73a0..429eb8d5ff45bad44a5363b2ee1323bc28679416 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -553,6 +553,11 @@ set its foreground and background to the default background and foreground."
 (defconst x-font-regexp-weight nil)
 (defconst x-font-regexp-slant nil)
 
+(defconst x-font-regexp-weight-subnum 1)
+(defconst x-font-regexp-slant-subnum 2)
+(defconst x-font-regexp-swidth-subnum 3)
+(defconst x-font-regexp-adstyle-subnum 4)
+
 ;;; Regexps matching font names in "Host Portable Character Representation."
 ;;;
 (let ((-               "[-?]")