* uuid now uses a bytevector for ffi.

2007-05-18 22:31:00 -04:00
parent 027d50e84a
commit 1c4d3c4b40
4 changed files with 7 additions and 19 deletions
@@ -467,8 +467,8 @@ ikp ik_uuid(ikp str){
    }
    uuid_strlen = strlen(uuid_chars);
  }
-  int n = unfix(ref(str, off_string_length));
-  unsigned char* data = str+off_string_data;
+  int n = unfix(ref(str, off_bytevector_length));
+  unsigned char* data = str+off_bytevector_data;
  read(fd, data, n);
  unsigned char* p = data;
  unsigned char* q = data + n;
@@ -480,20 +480,6 @@ ikp ik_uuid(ikp str){
 }


-#if 0
-ikp ik_read(ikp fdptr, ikp bufptr, ikp lenptr){
-  int fd = unfix(fdptr);
-  int len = unfix(lenptr);
-  char* buf = (char*)(bufptr+disp_string_data-string_tag);
-  int bytes = read(fd, buf, len);
-  if(bytes == -1){
-    perror("S_read");
-    exit(-10);
-  }
-  return fix(bytes);
-}  
-#endif
-
 ikp ik_write(ikp fdptr, ikp idx, ikp str){
  fprintf(stderr, "IK_WRITE\n");
  int fd = unfix(fdptr);