mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-29 19:30:36 +02:00
* test-suite/standalone/Makefile.am (top_srcdir): Add `top_srcdir'. (check_SCRIPTS, TESTS): Add `test-language'. (EXTRA_DIST): Add `test-language.el' and `test-language.js'. * test-suite/standalone/test-language, test-suite/standalone/test-language.el, test-suite/standalone/test-language.js: New files.
12 lines
198 B
JavaScript
12 lines
198 B
JavaScript
/* Sample ECMAscript code for `test-language'. */
|
|
|
|
function fib (n)
|
|
{
|
|
if (n <= 1)
|
|
return n;
|
|
else
|
|
return fib (n - 1) + fib (n - 2);
|
|
}
|
|
|
|
if (fib (7) != 13)
|
|
error ("Something's wrong!");
|