Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/ckit/regression/valid-programs.obs/t7.c
ViewVC logotype

View of /sml/trunk/ckit/regression/valid-programs.obs/t7.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 597 - (download) (as text) (annotate)
Wed Apr 5 18:34:51 2000 UTC (21 years, 8 months ago) by dbm
File size: 503 byte(s)
Initial revision
int (**x[4]) (int,int,int);

int (*(*y)[10]) (int,int,int);

extern int (nar) (int x,int y,int z);

int nar (int x,int y,int z) {
  return 3;
}

typedef int bar;

static int g;

static int narn (int x,int y,int z) {
  return (x+y+z);
}

void main ()
{ int (**x1) (int,int,int);
  int (*x2) (int,int,int);

  int (**y1) (int,int,int);
  int (*y2) (int,int,int);

  int i,j;

  *x[1] = &nar;
  x1 = x[1];
  x2 = *x1;

  
  y1 = *y;
  y2 = y1[0];


  i = (*x2) (4,5,6);
  j = (*y2)(4,5,6);
  return;
}





root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0