[BACK]Return to hppa.h CVS log [TXT] [DIR] Up to [gforth] / gforth

Diff for /gforth/Attic/hppa.h between versions 1.11 and 1.12

version 1.11, 1995/10/26 22:48:40 version 1.12, 1995/10/29 21:35:12
Line 55  extern void cacheflush(void *, int, int) Line 55  extern void cacheflush(void *, int, int)
   
 #  define ASS17(n)(((((n) >> 13) & 0x1F) << 16)| /* first 5 bits */ \  #  define ASS17(n)(((((n) >> 13) & 0x1F) << 16)| /* first 5 bits */ \
                    ((((n) >>  2) & 0x3FF) << 3)| /* second 11 bits */ \                     ((((n) >>  2) & 0x3FF) << 3)| /* second 11 bits */ \
                    ((((n) >> 12) & 0x1) << 2)  | /* lo sign (arg!) */ \                     ((((n) >> 12) & 0x1) << 2)  | /* lo sign (aaarg!) */ \
                    (((n) < 0) << 0)) /* sign bit */                     (((n) < 0) << 0)) /* sign bit */
   
 #  define DIS17(n)(((((n) >> 16) & 0x1F) << 13)| /* first 5 bits */ \  #  define DIS17(n)(((((n) >> 16) & 0x1F) << 13)| /* first 5 bits */ \
                    ((((n) >>  3) & 0x3FF) << 2)| /* second 11 bits */ \                     ((((n) >>  3) & 0x3FF) << 2)| /* second 11 bits */ \
                    ((((n) >>  2) & 0x1) << 12) | /* lo sign (arg!) */ \                     ((((n) >>  2) & 0x1) << 12) | /* lo sign (aaarg!) */ \
                    (-((n) & 1) << 18)) /* sign bit */                     (-((n) & 1) << 18)) /* sign bit */
   
 #  define CODE_ADDRESS(cfa)\  #  define CODE_ADDRESS(cfa)\
Line 102  extern void cacheflush(void *, int, int) Line 102  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x38 << 26) | /* major opcode */ \           _cfa[0] =((0x38 << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   0 <<  1))| /* if 1, don't execute delay slot */ \                     (   0 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_ca); \                     ASS17(_ca)); \
          _cfa[1] = ((long *)(_ca))[-1]; /* or %r0,%r0,%r0 */; \           _cfa[1] = ((long *)(_ca))[-1]; /* or %r0,%r0,%r0 */; \
      } \       } \
      else if(_dp < 0x40000 || _dp >= -0x40000) \       else if(_dp < 0x40000 || _dp >= -0x40000) \
Line 111  extern void cacheflush(void *, int, int) Line 111  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x3A << 26) | /* major opcode */ \           _cfa[0] =((0x3A << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   0 <<  1))| /* if 1, don't execute delay slot */ \                     (   0 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_dp); \                     ASS17(_dp)); \
          _cfa[1] = ((long *)(_ca))[-1]; /* 0x08000240 or %r0,%r0,%r0 */; \           _cfa[1] = ((long *)(_ca))[-1]; /* 0x08000240 or %r0,%r0,%r0 */; \
      } \       } \
      else \       else \
Line 128  extern void cacheflush(void *, int, int) Line 128  extern void cacheflush(void *, int, int)
          _cfa[1] =((0x38 << 26) | /* major opcode */ \           _cfa[1] =((0x38 << 26) | /* major opcode */ \
                    (   1 << 21) | /* register */ \                     (   1 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   1 <<  1))| /* if 1, don't execute delay slot */ \                     (   1 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_ca); \                     ASS17(_ca)); \
      } \       } \
      DOUT("%08x: %08x,%08x\n",(int)_cfa,_cfa[0],_cfa[1]); \       DOUT("%08x: %08x,%08x\n",(int)_cfa,_cfa[0],_cfa[1]); \
  })   })
Line 160  extern void cacheflush(void *, int, int) Line 160  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x38 << 26) | /* major opcode */ \           _cfa[0] =((0x38 << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   0 <<  1))| /* if 1, don't execute delay slot */ \                     (   0 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_ca); \                     ASS17(_ca)); \
          _cfa[1] = 0x08000240 /* or %r0,%r0,%r0 */; \           _cfa[1] = 0x08000240 /* or %r0,%r0,%r0 */; \
      } \       } \
      else if(_dp < 0x40000 || _dp >= -0x40000) \       else if(_dp < 0x40000 || _dp >= -0x40000) \
Line 169  extern void cacheflush(void *, int, int) Line 169  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x3A << 26) | /* major opcode */ \           _cfa[0] =((0x3A << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   0 <<  1))| /* if 1, don't execute delay slot */ \                     (   0 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_dp); \                     ASS17(_dp)); \
          _cfa[1] = 0x08000240 /* or %r0,%r0,%r0 */; \           _cfa[1] = 0x08000240 /* or %r0,%r0,%r0 */; \
      } \       } \
      else \       else \
Line 186  extern void cacheflush(void *, int, int) Line 186  extern void cacheflush(void *, int, int)
          _cfa[1] =((0x38 << 26) | /* major opcode */ \           _cfa[1] =((0x38 << 26) | /* major opcode */ \
                    (   1 << 21) | /* register */ \                     (   1 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   1 <<  1))| /* if 1, don't execute delay slot */ \                     (   1 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_ca); \                     ASS17(_ca)); \
      } \       } \
      DOUT("%08x: %08x,%08x\n",(int)_cfa,_cfa[0],_cfa[1]); \       DOUT("%08x: %08x,%08x\n",(int)_cfa,_cfa[0],_cfa[1]); \
  })   })
Line 204  extern void cacheflush(void *, int, int) Line 204  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x38 << 26) | /* major opcode */ \           _cfa[0] =((0x38 << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   1 <<  1))| /* if 1, don't execute delay slot */ \                     (   1 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_ca); \                     ASS17(_ca)); \
          _cfa[1] = (long)(ca); \           _cfa[1] = (long)(ca); \
      } \       } \
      else if(_dp < 0x40000 || _dp >= -0x40000) \       else if(_dp < 0x40000 || _dp >= -0x40000) \
Line 213  extern void cacheflush(void *, int, int) Line 213  extern void cacheflush(void *, int, int)
          _cfa[0] =((0x3A << 26) | /* major opcode */ \           _cfa[0] =((0x3A << 26) | /* major opcode */ \
                    (   0 << 21) | /* register */ \                     (   0 << 21) | /* register */ \
                    (   0 << 13) | /* space register */ \                     (   0 << 13) | /* space register */ \
                    (   1 <<  1))| /* if 1, don't execute delay slot */ \                     (   1 <<  1) | /* if 1, don't execute delay slot */ \
          ASS17(_dp); \                     ASS17(_dp)); \
          _cfa[1] = (long)(ca); \           _cfa[1] = (long)(ca); \
      } \       } \
      else \       else \
Removed from v.1.11  
changed lines
  Added in v.1.12

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>