UninterpretedBytes.st
changeset 19404 a310d47c43ab
parent 19402 b80de983fbdb
child 19412 1e842c25e51e
child 19415 524cb9f19895
equal deleted inserted replaced
19403:5accf347c2c1 19404:a310d47c43ab
  3405     if (__isSmallInteger(byteIndex)) {
  3405     if (__isSmallInteger(byteIndex)) {
  3406         unsigned char *cp;
  3406         unsigned char *cp;
  3407         INT sz;
  3407         INT sz;
  3408 
  3408 
  3409         __fetchBytePointerAndSize__(self, &cp, &sz);
  3409         __fetchBytePointerAndSize__(self, &cp, &sz);
  3410 printf("cp=%"_lx_"\n", (INT)cp);
  3410         // printf("cp=%"_lx_"\n", (INT)cp);
  3411         if (cp) {
  3411         if (cp) {
  3412             unsigned INT idx = ((unsigned INT)__intVal(byteIndex)) - 1;
  3412             unsigned INT idx = ((unsigned INT)__intVal(byteIndex)) - 1;
  3413 
  3413 
  3414             if ((idx+1) < sz) {
  3414             if ((idx+1) < sz) {
  3415                 cp += idx;
  3415                 cp += idx;