Execute SNUSP: Difference between revisions

=={{header|11l}}==

{{trans|Python}}

/++++!/===========?\>++.>+.+++++++..+++\

\+++\ | /+>+++++++>/ /++++++++++<<.++>./

ds[dp] = Byte(:stdin.read(1).code)

‘/’

‘\’

id (+)= 1

step()

 

{{out}}

<pre>

=={{header|Ada}}==

See [[Execute SNUSP/Ada]].

 

=={{header|AutoHotkey}}==

=={{header|D}}==

See [[RCSNUSP/D]].

 

=={{header|F_Sharp|F#}}==

=={{header|Haskell}}==

See [[RCSNUSP/Haskell]].

 

=={{header|J}}==

This program places no limits on the program or data size. Perhaps I'll revisit and write a tacit version of the SNUSP interpreter.

Note 'snusp'

 

end.

)

\ +++++++++++++++++++++++++++++++++++++\

! /+++++++++++++++++++++++++++++++++++++/

/ \..<+++++\

\ . +++++/

<pre>

load'snusp.ijs' NB. the j code above

=={{header|Julia}}==

This Modular SNUSP interpreter uses modular calls to echo the first 2 characters entered. Try typing "Hi" at the prompt.

/==!/======ECHO==,==.==#

| |

end

 

> Hi

Hi

=={{header|Kotlin}}==

{{trans|Go}}

 

// requires 5 chars (10 bytes) of data store

fun main(args: Array<String>) {

snusp(5, hw)

 

{{out}}

See [[RCSNUSP/Lua]].

 

See [[RCSNUSP/Mathematica]].

 

=={{header|OCaml}}==

 

=={{header|Phix}}==

{{out}}

<pre>

=={{header|Python}}==

{{trans|Go}}

 

HW = r'''

 

if __name__ == '__main__':

{{out}}

<pre>

{{works with|Rakudo|2017.02}}

Implementation of modular SNUSP.

 

has @!inst-pointer;

 

my $snusp = SNUSP.new;

{{out}}

<pre>Hello World!</pre>

The interpreter below implements Core SNUSP:

 

 

const proc: snusp (in string: sourceCode, in integer: memSize, inout file: input, inout file: output) is func

begin

snusp(helloWorld, 5, IN, OUT);

 

{{out}}

=={{header|Tcl}}==

See [[RCSNUSP/Tcl]].

 

{{omit from|GUISS}}