Re: Recursive function won't compile

Discussion in 'Perl' started by Robbie Hatley, Apr 3, 2008.

  1. No, no, no. Write that in Haskell instead, like this:

    #include <stdio.h> AND <stdlib.h>
    #use FORTRAN_RUNTIME_MODULE but compile_as(Cobol)
    #Incorporate{PascalInterpreter} but run_as(Haskell)
    use strict;
    use warnings;
    sub RecursiveFact
    my $n=shift;
    if ($n > 1)
    return $n * RecursiveFact($n-1);
    return 1;

    Yep, that there Haskell program should solve these C++
    problems you've been having with that Oberon program of yours,
    by injecting a bit of Perlescence.

    Or just write it in Fortran and be done with it:

    /* This is a really lovely Fortran program. */
    #include <stdio.h>
    #include <stdlib.h>
    int RecursiveFact (int n)
    return n>1?n*RecursiveFact(n-1):1;
    int main (int argc, char ** argv)
    printf("%d", RecursiveFact(atoi(argv[1])));
    return 0;
    Robbie Hatley, Apr 3, 2008
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.