From 932844e590156a2bf9d970151382aae50acc30c4 Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Sat, 23 Apr 2022 09:51:04 +0100
Subject: can also compile with raku

---
 fibonacci.pl.c | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'fibonacci.pl.c')

diff --git a/fibonacci.pl.c b/fibonacci.pl.c
index 9f45b12..2482a41 100644
--- a/fibonacci.pl.c
+++ b/fibonacci.pl.c
@@ -33,10 +33,9 @@ BEGIN {
 	hello();
 	my $i = 0;
 
-	for ($i = 0; $i <= 10; ++$i) {
+  while ($i <= 10) {
 		$arg = $i;
 		printf("fib(%d) = %d\n", $i, fibonacci());
+		$i++;
 	}
-
-	return 0;
 }
-- 
cgit v1.2.3