@page "/Concat"
<PageTitle>Concatenator</PageTitle>
<PageScript Src="./Components/Pages/Concat.razor.js"/>
<main>
    <p>A "concatenative language"</p>
    <form id="form">
        <textarea id="input" placeholder="1 2 +" rows="5"></textarea>
        <input type="submit" value="Run program">
    </form>
    <Log/>

    <Panel Legend="Predefined operations">
        <StackOps/>

        <StackOp Name="skip"
                 Description="Skips forward in the program by the amount on the top of the stack. If the value on the top of the stack is 0 or negative, the value is dropped and the program does not skip ahead.">
            <StackStep Stack="[1, 2, 3]" Program="skip drop dup"/>
            <StackStep Stack="[2, 3]" Program="dup"/>
            <StackStep Stack="[2, 2, 3]"/>
            <p>Or</p>
            <StackStep Stack="[-1, 2, 3]" Program="skip drop dup"/>
            <StackStep Stack="[2, 3]" Program="drop dup"/>
            <StackStep Stack="[3]" Program="dup"/>
            <StackStep Stack="[3, 3]"/>
        </StackOp>

        <StackOp Name=": word ... ;" Description="Creates a new definition.">
            <p>
                Example: ": double 2 * ;" defines a new word called double. Any subsequent mention of double will
                replace the word with its definition.
            </p>
            <StackStep Stack="[]" Program=": double 2 * ; 3 double"/>
            <StackStep Stack="[]" Program="3 double"/>
            <StackStep Stack="[3]" Program="double"/>
            <StackStep Stack="[3]" Program="2 *"/>
            <StackStep Stack="[2, 3]" Program="*"/>
            <StackStep Stack="[6] <=="/>
        </StackOp>
    </Panel>

    <Panel Legend="Example programs">
        <details>
            <summary>Factorial</summary>
            <NavLink
                href="/concat?in=FwAgxg9grgdgLgUwE4lQEygBxAJhAZwHcBDbAWhAG4AoUAQlRA2wEYQLJZEV8BrAS2wMAVFWoB2EHWpA">
                Replace program
            </NavLink>
            <pre>
                : counter   dup 2 swap - ;
                : !   dup 1 - counter skip ! * ;
                7 !
            </pre>
        </details>
    </Panel>
</main>