1 LIST = 1 2 3 4 #a comment

     2 !equals( LIST, 1 2 3 4 ) {

     3    message( "FAILED: inline comment" )

     4 }

     5 

     6 LIST = 1 \

     7        2 \

     8 #      3 \

     9        4

    10 !equals( LIST, 1 2 4 ) {

    11    message( "FAILED: commented out continuation" )

    12 }

    13 

    14 LIST = 1 \

    15        2 \#comment

    16        3 \

    17        4

    18 !equals( LIST, 1 2 3 4 ) {

    19     message( "FAILED: comment at end of continuation")

    20 }

    21 

    22 

    23 LIST = 1 2 3 4#comment

    24 !equals( LIST, 1 2 3 4 ) {

    25     message( "FAILED: no space before comment" )

    26 }

    27 

    28 LIST = 1 2 3 4$${LITERAL_HASH}five

    29 !equals( LIST, 1 2 3 4$${LITERAL_HASH}five ) {

    30     message( "FAILED: using LITERAL_HASH" )

    31 }

    32 

    33