From d4b6619f654906b83c1fb09e2afc564975abef46 Mon Sep 17 00:00:00 2001
From: Adam NAILI
Date: Wed, 6 Jun 2018 01:29:17 +0200
Subject: Ok sample correction

---
 res/ok_sample.tpc | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'res')

diff --git a/res/ok_sample.tpc b/res/ok_sample.tpc
index 7b56e7f..e27e86a 100644
--- a/res/ok_sample.tpc
+++ b/res/ok_sample.tpc
@@ -6,19 +6,17 @@
 
 const special = 'b';
 
-caractere funky_func(entier arg) {
+entier funky_func(entier arg) {
   return !arg;
 }
 
 void main(void) {
-  caractere ret;
+  entier ret;
   ret = 1 + funky_func(0) * 2;
 
   while (ret) {
-    readc(ret);
+    reade(ret);
     print(ret);
-
-    if (ret == special) print('!');
   }
 }
 
-- 
cgit v1.2.3