gemini-main ( -- )

Vocabulary

gemini.cli

Inputs

None

Outputs

None

Definition

USING: command-loop kernel sequences ;

IN: gemini.cli

: gemini-main ( -- )
    "Welcome to Project Gemini!" "GEMINI>" gemini-command-loop
    new-command-loop COMMANDS [ over add-command ] each
    run-command-loop ;