Execute CopyPasta Language: Difference between revisions

|}

<br>

 

=={{header|C++}}==

{{trans|Nanoquery}}

#include <iostream>

#include <sstream>

// return in case we never hit a 'Pasta!' statement

return 0;

 

The following files were used for testing:

 

8. When the program is about to end and the contents of the clipboard have (when appropriate) been printed out, the clipboard should be cleared.

package main

 

err = clipboard.WriteAll("") // clear clipboard

check(err)

 

{{out}}

=={{header|Java}}==

{{trans|Nanoquery}}

import java.nio.file.Files;

import java.util.ArrayList;

}

}

 

The following files were used for testing:

 

=={{header|Julia}}==

function interpretCopyPasta()

clipboard = String[]

 

interpretCopyPasta()

If run on the following CopyPasta "code" file:

<pre>

 

=={{header|Nanoquery}}==

def fatal_error(errtext)

println "%" + errtext

// increment past the command and the next line

loc += 2

 

The following files were used for testing:

usage: copypasta.nq [filename.cp]

</pre>

 

=={{header|Perl}}==

use warnings;

use feature 'say';

}

 

{{out}}

<pre>Rosetta Code

If run without command-line parameters it fakes four runs.<br>

Assumes if clipboard is "hello ", Duplicate 2 should leave it as "hello hello hello ".

{{out}}

<pre>

=={{header|Python}}==

{{trans|Nanoquery}}

 

# a function to handle fatal errors

# increment past the command and the next line

loc += 2

 

The following files were used for testing:

=={{header|Raku}}==

(formerly Perl 6)

my @code = $code.split("\n")>>.trim.grep: *.so;

return "Program never ends!" unless grep { $_ eq 'Pasta!' }, @code;

"Copy\nRosetta Code\nDuplicate\n2\n\nPasta";

 

{{out}}

<pre>Rosetta Code

 

Program never ends!</pre>

 

=={{header|zkl}}==

pasta:=File(srcNm).read().howza(11); // zkl pastaprog.cp, stripped lines

foreach line in (pasta){

}catch(TheEnd){ error(w,"Error: End of file: ") }

catch{ error(w,wantInt and "Not an int: " or "Error: ") }

Input programs:

<pre style="height:15ex">