enum bfd_endian byte_order)
{
gdb_byte buffer[20];
+
read_memory (SCM2PTR (svalue) + index * size, buffer, size);
return extract_signed_integer (buffer, size, byte_order);
}
{
char *filename = cursal.symtab->filename;
int len = strlen (filename);
+
if (len >= 6 && strcmp (filename + len - 6, "eval.c") == 0)
return 1;
}
struct value *func;
struct value *addr = value_allocate_space_in_inferior (len + 1);
LONGEST iaddr = value_as_long (addr);
+
write_memory (iaddr, (gdb_byte *) str, len);
/* FIXME - should find and pass env */
write_memory (iaddr + len, (gdb_byte *) "", 1);
enum exp_opcode op = exp->elts[*pos].opcode;
int len, pc;
char *str;
+
switch (op)
{
case OP_NAME: