#include <perms.h>

//          Edinburgh IMP77 Compiler - Version 8.4
//
//     1  %ownintegerarray IA(0:2)

static int IA[3];

//     2
//     3  %integermap IMP(%integer N)

static int *IMP(int N)
{

  //     4    %result == IA(N)      ;! This is outputting *N rather than N

  return /*?*/ &IA[N];

  //     5  %end

} /* end of IMP */

//     6
//     7  %ownintegername IN      ;! Remove this statement and the "N" above is output correctly!

static int *IN;

//     8                          ;! implying a problem either with filter.c or with removing
//     9                          ;! marked icodes incorrectly? (or something completely different)
//    10
//    11  %endoffile