aboutsummaryrefslogtreecommitdiff
path: root/res/ok_sample.tpc
blob: c8d3d9dff1a319f6111085e3dec586e5913b7f4b (plain)
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);
  }
}