Skip to content
Snippets Groups Projects
const_formals.res.oracle 1.57 KiB
Newer Older
[kernel] Parsing const_formals.i (no preprocessing)
[kernel:typing:incompatible-types-call] const_formals.i:28: Warning: 
  implicit conversion between incompatible function types:
  int (*)(int *x)
  and
  int (*)(int const *y)
[kernel:typing:incompatible-types-call] const_formals.i:28: Warning: 
  expected 'int (*)(int const *y)' but got argument of type 'int (*)(int *x)': & incr_get
/* Generated by Frama-C */
char const *s = "foo";
char mutable_s[4] = {(char)'b', (char)'a', (char)'r', (char)'\000'};
char const **p = & s;
char f(char const *s_0)
{
  char __retres;
  __retres = *(s_0 + 0);
  return __retres;
}

char g(char const * const *a)
{
  char __retres;
  __retres = *(*a);
  return __retres;
}

Virgile Prevosto's avatar
Virgile Prevosto committed
void foo(int *x, int * restrict y);
Virgile Prevosto's avatar
Virgile Prevosto committed
void foo(int *x, int * restrict y)
{
  int *tmp;
  int *tmp_0;
  tmp = x;
  x ++;
  ;
  tmp_0 = y;
  y --;
  ;
  return;
}

int incr_get(int *x)
{
  int __retres;
  int *tmp;
  tmp = x;
  x ++;
  ;
  __retres = *x;
  return __retres;
}

int get(int const *x)
{
  int __retres;
  __retres = *x;
  return __retres;
}

int apply_const(int *x, int (*g_0)(int const *y))
{
  int tmp;
  tmp = (*g_0)((int const *)x);
  return tmp;
}

int apply_non_const(int *x, int (*g_0)(int *y))
{
  int tmp;
  tmp = (*g_0)(x);
  return tmp;
}

int main(void)
{
  int __retres;
  int x = 1;
  apply_const(& x,(int (*)(int const *y))(& incr_get));
  apply_non_const(& x,& incr_get);
  apply_const(& x,& get);
  apply_non_const(& x,(int (*)(int *y))(& get));
  char c = f((char const *)(mutable_s));
  char d = g((char const * const *)p);
  __retres = 0;
  return __retres;
}