restored gfcc example (GF C compiler)

2010-03-02 19:10:56 +00:00
parent 21b10f91cb
commit e4748e9984
15 changed files with 2169 additions and 0 deletions
--- a/examples/gfcc/fibonacci.c
+++ b/examples/gfcc/fibonacci.c
@@ -0,0 +1,18 @@
+int mx () {
+  return 5000000 ;
+} ;
+
+int main () {
+  int lo ; int hi ;
+  lo = 1 ;
+  hi = lo ;
+  printf("%d",lo) ;
+  {
+    while (hi < mx()) {
+      printf("%d",hi) ;
+      hi = lo + hi ;
+      lo = hi - lo ;
+      }
+  }
+  return ;
+} ;