(chise-json-normalized-feature<): Prefer nil domain.

(chise-json-char-get-info): Sort parents-spec.

v1/chise-json-api.el

@@ -1318,7 +1318,11 @@
    ((string< (caar a) (caar b))
     )
    ((eq (caar a) (caar b))
-    (string< (cdar a) (cdar b)))))
+    (if (cdar a)
+	(if (cdar b)
+	    (string< (cdar a) (cdar b))
+	  nil)
+      t))))
 
 (defun chise-json-other-spec-get-radical-strokes (other-spec)
   (let (domain-rs-alist
@@ -2413,7 +2417,9 @@
 			       (cons domain cell))
 			     radical-strokes-spec))
 		    dest)))
-    (dolist (cell parents-spec)
+    (dolist (cell (sort parents-spec
+			(lambda (a b)
+			  (chise-json-normalized-feature< b a))))
       (setq dest
 	    (cons (cons (cond
 			 ((equal (car cell) '(<-denotational))