From 01c0d408953f55aab1ab15538b80be0cc7170f4b Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@gmail.com>
Date: Thu, 26 Feb 2009 11:59:22 +0100
Subject: [PATCH] sharing variables between perl and c

---
 fibonacci.txt | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/fibonacci.txt b/fibonacci.txt
index 8f28cc7..db158a4 100644
--- a/fibonacci.txt
+++ b/fibonacci.txt
@@ -1,16 +1,16 @@
 #include <stdio.h>
 #include <stdlib.h>
 
-#define whatever /*
+#define $ /*
 "*/
 main () /*"; # */
 {
-    $i = 0;
-    $n1 = $n2 = 1;
-    print "$n1\n";
-    while ( $i < 9 ) {
-        ($n1, $n2) = ($n2, $n1+$n2);
-        print "$n1\n";
-        $i++;
+    $ i = 0;
+    $ n1 = $ n2 = 1;
+    print "$ n1\n";
+    while ( $ i < 9 ) {
+        ( $ n1, $ n2 ) = ( $ n2, $ n1 + $ n2 );
+        print "$ n1\n";
+        $ i++;
     }
 }
-- 
2.11.4.GIT