4.3BSD - /usr/src/new/X/inline/libcpats.c

   1: /* Copyright (c) 1984 Regents of the University of California */
   2: 
   3: #ifndef lint
   4: static char sccsid[] = "@(#)libcpats.c	1.2	(Berkeley)	8/18/84";
   5: #endif not lint
   6: 
   7: #include "inline.h"
   8: 
   9: /*
  10:  * Pattern table for the C library.
  11:  */
  12: struct pats libc_ptab[] = {
  13: 
  14: #ifdef vax
  15:     { "1,_fgetc\n",
  16: "	movl	(sp)+,r2\n\
  17: 	sobgeq	(r2),1f\n\
  18: 	pushl	r2\n\
  19: 	calls	$1,__filbuf\n\
  20: 	jbr	2f\n\
  21: 1:\n\
  22: 	movzbl	*4(r2),r0\n\
  23: 	incl	4(r2)\n\
  24: 2:\n" },
  25: 
  26:     { "2,_fputc\n",
  27: "	movl	(sp)+,r2$\n\
  28: 	movl	(sp)+,r3\n\
  29: 	sobgeq	(r3),1f\n\
  30: 	pushl	r3\n\
  31: 	pushl	r2\n\
  32: 	calls	$2,__flsbuf\n\
  33: 	jbr	2f\n\
  34: 1:\n\
  35: 	movb	r2,*4(r3)\n\
  36: 	incl	4(r3)\n\
  37: 2:\n" },
  38: 
  39:     { "1,_strlen\n",
  40: "	movl	(sp)+,r5\n\
  41: 	movl	r5,r1\n\
  42: 1:\n\
  43: 	locc	$0,$65535,(r1)\n\
  44: 	jeql	1b\n\
  45: 	subl3	r5,r1,r0\n" },
  46: #endif vax
  47: 
  48: #ifdef mc68000
  49: /* someday... */
  50: #endif mc68000
  51: 
  52:     { "", "" }
  53: };

Defined variables