RegressionTests__JavaScriptTestClass.st
author Claus Gittinger <cg@exept.de>
Tue, 28 Aug 2018 13:03:54 +0200
changeset 2003 710ddabaec76
parent 2002 721352c71cac
child 2004 3b06c74f24b7
permissions -rw-r--r--
#QUALITY by cg class: RegressionTests::JavaScriptTestClass added: #testMap6 #testMap7
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
2001
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
public class RegressionTests::JavaScriptTestClass extends Object
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
{
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
/** category: testing **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
/**
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
    (new JavaScriptTestClass).testMap1()
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
 **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
function testMap1() {
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
    return [1,2,3].map( el => el ** 2 );
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
/** category: testing **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
/**
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
    (new JavaScriptTestClass).testMap2()
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
 **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
function testMap2() {
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
    return [1,2,3].map( (el) => el ** 2 );
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
/** category: testing **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    25
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
/**
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
    (new JavaScriptTestClass).testMap3()
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
 **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    29
function testMap3() {
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
    return [1,2,3].map( (el) => { return el ** 2; } );
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
/** category: testing **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    34
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
/**
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    36
    (new JavaScriptTestClass).testMap4()
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    37
 **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    38
function testMap4() {
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
    function f(el) { return el ** 2; };
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
    
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    41
    return [1,2,3].map( f );
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
/** category: testing **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
/**
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
    (new JavaScriptTestClass).testMap5()
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
 **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
function testMap5() {
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
    function f(el) { 
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
        return el ** 2; 
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
    }
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
    
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
    return [1,2,3].map( f );
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
2003
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    57
/** category: testing **/
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    58
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    59
/**
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    60
    (new JavaScriptTestClass).testMap6()
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    61
 **/
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    62
function testMap6() {
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    63
    var f = function (el) { return el ** 2; };
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    64
    
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    65
    return [1,2,3].map( f );
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    66
}
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    67
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    68
/** category: testing **/
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    69
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    70
/**
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    71
    (new JavaScriptTestClass).testMap7()
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    72
 **/
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    73
function testMap7() {
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    74
    var f = el => el ** 2;
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    75
    
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    76
    return [1,2,3].map( f );
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    77
}
710ddabaec76 #QUALITY by cg
Claus Gittinger <cg@exept.de>
parents: 2002
diff changeset
    78
2001
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    79
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    80
/** category: documentation **/
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    81
2002
721352c71cac #BUGFIX by cg
Claus Gittinger <cg@exept.de>
parents: 2001
diff changeset
    82
static function version_CVS() {
2001
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
    return("$Header$");
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    84
}
6fa077edd661 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    85