Lines Matching refs:princ
42 (princ (car args))
43 (princ " "))
45 (princ (car args))
46 (princ "\n"))
334 (princ (format "%03d:%s:%d:%d:%d:%d:%d:%d:%d:%s\n"
568 (princ (format
590 (princ "\tany other charsets\n"))
592 (princ (format "\t%s:%s\n"
610 (princ "\n")
613 (princ "See also the documentation of these customizable variables
616 (princ " `")
617 (princ v)
618 (princ "'\n"))
619 (princ "\n")))
621 (princ "Type: ")
624 (princ type)
626 (princ " (do no conversion)"))
628 (princ " (do automatic conversion)"))
630 (princ " (Emacs internal multibyte form)"))
632 (princ " (Shift-JIS, MS-KANJI)"))
634 (princ " (variant of ISO-2022)\n")
635 (princ "Initial designations:\n")
637 (princ "Other Form: \n ")
638 (princ (if (aref flags 4) "short-form" "long-form"))
639 (if (aref flags 5) (princ ", ASCII@EOL"))
640 (if (aref flags 6) (princ ", ASCII@CNTL"))
641 (princ (if (aref flags 7) ", 7-bit" ", 8-bit"))
642 (if (aref flags 8) (princ ", use-locking-shift"))
643 (if (aref flags 9) (princ ", use-single-shift"))
644 (if (aref flags 10) (princ ", use-roman"))
645 (if (aref flags 11) (princ ", use-old-jis"))
646 (if (aref flags 12) (princ ", no-ISO6429"))
647 (if (aref flags 13) (princ ", init-bol"))
648 (if (aref flags 14) (princ ", designation-bol"))
649 (if (aref flags 15) (princ ", convert-unsafe"))
650 (if (aref flags 16) (princ ", accept-latin-extra-code"))
651 (princ "."))
653 (princ " (Big5)"))
655 (princ " (do conversion by CCL program)"))
657 (princ " (text with random binary characters)"))
658 (t (princ ": invalid coding-system."))))
659 (princ "\nEOL type: ")
662 (princ "Automatic selection from:\n\t")
663 (princ eol-type)
664 (princ "\n"))
665 ((or (null eol-type) (eq eol-type 0)) (princ "LF\n"))
666 ((eq eol-type 1) (princ "CRLF\n"))
667 ((eq eol-type 2) (princ "CR\n"))
668 (t (princ "invalid\n"))))
671 (princ "After decoding text normally,")
672 (princ " perform post-conversion using the function: ")
673 (princ "\n ")
674 (princ postread)
675 (princ "\n")))
678 (princ "Before encoding text normally,")
679 (princ " perform pre-conversion using the function: ")
680 (princ "\n ")
681 (princ prewrite)
682 (princ "\n")))
746 ;; Print symbol name and mnemonic letter of CODING-SYSTEM with `princ'.
753 (princ "nil\n")
754 (princ (format "%c -- %s"
760 (princ (format " %S" (cons 'alias: (cdr aliases))))))
762 (princ (format " (alias of %s)" (car aliases))))
769 (princ (format " (alias of %s)"
771 (princ "\n")
773 (princ "\n"))
780 (princ (format "%s\n" doc))))))
789 (princ "Coding system for saving this buffer:\n ")
792 (princ "Not set locally, use the default.\n"))
793 (princ "Default coding system (for new files):\n ")
795 (princ "Coding system for keyboard input:\n ")
797 (princ "Coding system for terminal output:\n ")
800 (princ "Coding systems for process I/O:\n")
801 (princ " encoding input to the process: ")
803 (princ " decoding output from the process: ")
805 (princ "Defaults for subprocess I/O:\n")
806 (princ " decoding: ")
808 (princ " encoding: ")
813 (princ "
824 (princ (format " %d. %s " i coding))
828 (princ (cons 'alias: (cdr aliases))))
830 (princ (list 'alias 'of (car aliases)))))
835 (princ "\n Other coding systems cannot be distinguished automatically
854 (princ (format "\
868 (princ "Particular coding systems specified for certain file names:\n")
870 (princ " OPERATION\tTARGET PATTERN\t\tCODING SYSTEM(s)\n")
871 (princ " ---------\t--------------\t\t----------------\n")
873 (princ " ")
874 (princ operation)
876 (princ "\tnothing specified\n")
883 (princ (cdr (car alist)))
884 (princ "\n")
898 (princ (format "%s (alias of %s)\n" coding-system (car aliases)))
899 (princ coding-system)
902 (princ ",")
903 (princ (car aliases))
905 (princ (format ":%s:%c:%d:"
915 (princ -1))
917 (princ -2))
919 (princ charset))
921 (princ "(")
922 (princ (car charset))
925 (princ ",")
926 (princ (car charset))
928 (princ ")")))
929 (princ ",")
932 (princ (if (aref flags idx) 1 0))
933 (princ ",")
935 (princ (if (aref flags idx) 1 0))))
939 (princ (format " %s" (car flags)))
942 (princ (format " %x" (aref (car flags) i)))
944 (princ ",")
946 (princ (format "%s" (cdr flags)))
949 (princ (format " %x" (aref (cdr flags) i)))
951 (t (princ 0)))
952 (princ ":")
953 (princ (coding-system-doc-string coding-system))
954 (princ "\n"))))
969 (princ "\
975 (princ "\
1008 (princ "\
1014 (princ-list (car elt))))))
1020 (princ "\
1028 (princ (format "%s:%s\n" (car l) (symbol-value (car l))))
1205 (princ "
1208 (princ "LANGUAGE\n NAME (`TITLE' in mode line)\n")
1209 (princ " SHORT-DESCRIPTION\n------------------------------\n")
1219 (princ language)
1221 (princ (format " %s (`%s' in mode line)\n %s\n"
1298 (princ "\
1306 (princ (format "%s:%s\n" (car l) (symbol-value (car l))))