Return to port.c CVS log | Up to [local] / OpenXM_contrib2 / asir2000 / asm |
1.1 noro 1: /* $OpenXM: OpenXM/src/asir99/asm/port.c,v 1.1.1.1 1999/11/10 08:12:25 noro Exp $ */ 2: #include "base.h" 3: 4: int dsab(base,a1,a2,up) 5: int base,a1,a2,*up; 6: { 7: return dmab(base,a1,BASE,a2,up); 8: } 9: 10: int dqr(a,b,qp) 11: int a,b,*qp; 12: { 13: *qp = a/b; 14: return a - b * (*qp); 15: }