FIBOS.b 859 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. /*
  2. * Input file : ./tests/inputs/FIBOS.EXE
  3. * File type : EXE
  4. */
  5. #include "dcc.h"
  6. int proc_1 (int arg0)
  7. /* Takes 2 bytes of parameters.
  8. * High-level language prologue code.
  9. * C calling convention.
  10. */
  11. {
  12. int loc1;
  13. int loc2; /* ax */
  14. loc1 = arg0;
  15. if (loc1 > 2) {
  16. loc2 = (proc_1 ((loc1 - 1)) + proc_1 ((loc1 + 0xfffe)));
  17. }
  18. else {
  19. loc2 = 1;
  20. }
  21. return (loc2);
  22. }
  23. void main ()
  24. /* Takes no parameters.
  25. * High-level language prologue code.
  26. */
  27. {
  28. int loc1;
  29. int loc2;
  30. int loc3;
  31. int loc4;
  32. printf ("Input number of iterations: ");
  33. scanf ("%d", &loc1);
  34. loc3 = 1;
  35. while ((loc3 <= loc1)) {
  36. printf ("Input number: ");
  37. scanf ("%d", &loc2);
  38. loc4 = proc_1 (loc2);
  39. printf ("fibonacci(%d) = %u\n", loc2, loc4);
  40. loc3 = (loc3 + 1);
  41. } /* end of while */
  42. exit (0);
  43. }