int clz (void*);
int f(const void*, int, int);
int g(const void*);
long long g2(const void*);
void h(int);
void q(void*, int);

struct real_value {
  unsigned int uexp : 26;
  unsigned long sig[5];
};

void real_from_integer (struct real_value *r, void *val_in)
{
  unsigned int len = g(val_in);
  char val;
  f(val_in, 0, 0);
  g(&val);
  if (len > 160) {
    char temp;
    g(&temp);
    clz (&temp);
    len = 160;
  }
  q(&val, f(&val, 0, 0));
  int j = 4;
  long e;
  for (int i = len - 1; i >= 0; i--) {
    if (i <= g(&val))
      e = g2(&val);
    r->sig[j--] = 0;
    r->sig[j--] = e;
  }
  struct real_value rr = {0, {0,0}};
  h((rr.uexp^ 1)*0.43);
  g(&rr);
}