Mercurial > emacs

diff src/print.c @ 373:7c6f74ef31a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Sun, 04 Aug 1991 21:39:58 +0000
parents 52f53a69e5c4
children 34ec8957c6c0
line wrap: on
line diff
--- a/src/print.c	Fri Aug 02 02:24:35 1991 +0000
+++ b/src/print.c	Sun Aug 04 21:39:58 1991 +0000
@@ -805,7 +805,7 @@
       break;
 
     case Lisp_Compiled:
-      strout ("#<byte-code ", -1, printcharfun);
+      strout ("#", -1, printcharfun);
     case Lisp_Vector:
       PRINTCHAR ('[');
       {
@@ -819,8 +819,6 @@
 	  }
       }
       PRINTCHAR (']');
-      if (XTYPE (obj) == Lisp_Compiled)
-	PRINTCHAR ('>');
       break;
 
 #ifndef standalone