(chise-json-char-get-info): Modify format to indicate children:

- Use char-info format for `denotation' and `subsume' even if number
  of children >= 5.
- Use char-ref format for `unified-in-usage' and
  `unified-as-component' (or other domains to indicate children).

v1/chise-json-api.el

@@ -2253,7 +2253,7 @@
 	radical-strokes-spec
 	sound-spec
 	id
-	ret i
+	ret i flag
 	node-id
 	anno-id
 	domain code
@@ -2287,12 +2287,16 @@
     (dolist (cell (sort children-spec
 			(lambda (a b)
 			  (chise-json-normalized-feature< b a))))
+      (setq flag nil)
+      (setq ret (cdr (assq 'body (cdr cell))))
       (setq dest
 	    (cons
 	     (cons (cond
 		    ((equal (car cell) '(->denotational))
+		     (setq flag t)
 		     'denotation)
 		    ((equal (car cell) '(->subsumptive))
+		     (setq flag t)
 		     'subsume)
 		    ((equal (car cell) '(->denotational . usage))
 		     'unified-in-usage)
@@ -2302,7 +2306,7 @@
 		     (caar cell))
 		    (t
 		     (format "%s@%s" (caar cell)(cdar cell))))
-		   (if (< (length (setq ret (cdr (assq 'body (cdr cell))))) 5)
+		   (if flag
 		       (mapvector (lambda (item)
 				    (chise-json-char-get-info
 				     (cdr (assq 'body item))