The R Project SVN R

Rev

Rev 49607 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 49607 Rev 57571
Line 104... Line 104...
104
	  mem->ptr = provided_block;
104
	  mem->ptr = provided_block;
105
	  mem->n = TRE_MEM_BLOCK_SIZE;
105
	  mem->n = TRE_MEM_BLOCK_SIZE;
106
	}
106
	}
107
      else
107
      else
108
	{
108
	{
109
	  int block_size;
109
	  size_t block_size;
110
	  if (size * 8 > TRE_MEM_BLOCK_SIZE)
110
	  if (size * 8 > TRE_MEM_BLOCK_SIZE)
111
	    block_size = size * 8;
111
	    block_size = size * 8;
112
	  else
112
	  else
113
	    block_size = TRE_MEM_BLOCK_SIZE;
113
	    block_size = TRE_MEM_BLOCK_SIZE;
114
	  DPRINT(("tre_mem_alloc: allocating new %d byte block\n",
114
	  DPRINT(("tre_mem_alloc: allocating new %u byte block\n",
115
		  block_size));
115
		  (unsigned int)block_size));
116
	  l = xmalloc(sizeof(*l));
116
	  l = xmalloc(sizeof(*l));
117
	  if (l == NULL)
117
	  if (l == NULL)
118
	    {
118
	    {
119
	      mem->failed = 1;
119
	      mem->failed = 1;
120
	      return NULL;
120
	      return NULL;