samples/fizzbuzz.js

Fri, 05 Jun 2015 12:38:53 +0200

author
mhaupt
date
Fri, 05 Jun 2015 12:38:53 +0200
changeset 1398
2f1b9f4daec1
parent 962
ac62e33a99b0
permissions
-rw-r--r--

8080087: Nashorn $ENV.PWD is originally undefined
Summary: On Windows, the PWD environment variable does not exist and cannot be imported in scripting mode, so it is set explicitly.
Reviewed-by: lagergren, sundar

aoqi@0 1 /*
aoqi@0 2 * Copyright (c) 2014, Oracle and/or its affiliates. All rights reserved.
attila@962 3 *
aoqi@0 4 * Redistribution and use in source and binary forms, with or without
aoqi@0 5 * modification, are permitted provided that the following conditions
aoqi@0 6 * are met:
attila@962 7 *
aoqi@0 8 * - Redistributions of source code must retain the above copyright
aoqi@0 9 * notice, this list of conditions and the following disclaimer.
attila@962 10 *
aoqi@0 11 * - Redistributions in binary form must reproduce the above copyright
aoqi@0 12 * notice, this list of conditions and the following disclaimer in the
aoqi@0 13 * documentation and/or other materials provided with the distribution.
attila@962 14 *
aoqi@0 15 * - Neither the name of Oracle nor the names of its
aoqi@0 16 * contributors may be used to endorse or promote products derived
aoqi@0 17 * from this software without specific prior written permission.
attila@962 18 *
aoqi@0 19 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
aoqi@0 20 * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
aoqi@0 21 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
aoqi@0 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
aoqi@0 23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
aoqi@0 24 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
aoqi@0 25 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
aoqi@0 26 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
aoqi@0 27 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
aoqi@0 28 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
aoqi@0 29 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
aoqi@0 30 */
aoqi@0 31
aoqi@0 32 // What is FizzBuzz? http://c2.com/cgi/wiki?FizzBuzzTest
aoqi@0 33
aoqi@0 34 // Yet another FizzBuzz impl. using Java 8 lambda and stream
aoqi@0 35 // but using Nashorn. This is ECMAScript port of @stuartmarks'
aoqi@0 36 // Java implementation
aoqi@0 37
aoqi@0 38 var IntStream = Java.type("java.util.stream.IntStream");
aoqi@0 39
aoqi@0 40 function ifmod(m, r, f) {
aoqi@0 41 return function(i) { return i % m == 0? r : f(i); }
aoqi@0 42 }
aoqi@0 43
aoqi@0 44 // pass script function for lambda
aoqi@0 45 IntStream.rangeClosed(1, 100).
aoqi@0 46 mapToObj(
aoqi@0 47 ifmod(15, "FizzBuzz", ifmod(5, "Buzz", ifmod(3, "Fizz", String))))
aoqi@0 48 .forEach(print);

mercurial