Posted to tcl by miguel at Tue Mar 18 16:08:42 GMT 2008view raw

  1. static inline int
  2. OFFSET(
  3. void *ptr)
  4. {
  5. int mask, i;
  6.  
  7. mask = TCL_ALLOCALIGN-1;
  8. ptr++;
  9. for (i=1; (((intptr_t)ptr) & mask); i++, ptr++) {}
  10. return i;
  11. }

Comments

Posted by jenglish at Tue Mar 18 16:44:24 GMT 2008 [text] [code]

No good. Can't do arithmetic on (void *)s.