res/test_sample_ok.tpc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

/**
  * UPEM / Compilation / Projet TPC
  * Exemple de fichier source TPC valide
  * Pacien TRAN-GIRARD, Adam NAILI
  */

const special = 'b';

entier funky_func(entier arg) {
  return !arg;
}

void main(void) {
  entier ret;
  ret = 1 + funky_func(0) * 2;

  while (1) {
    reade(ret);
    print(ret);
  }
}