~toastal/klossi

~toastal/klossi/bin/klossi.dats
 ..
0 // SPDX-FileCopyrightText: 2024 toastal <toastal@posteo.net>
1 // SPDX-License-Identifier: MPL-2.0
2
3 #include "share/atspre_staload.hats"
4 #include "share/atspre_staload_libats_ML.hats"
5
6 staload Ncurses = "lib/ncurses.sats"
7 dynload "lib/ncurses.dats"
8
9 implement main0 (): void = {
10 var window = $Ncurses.initscr()
11 val () = $Ncurses.cbreak()
12 val () = $Ncurses.echo()
13 val () = $Ncurses.printw("Hello, world!")
14 val () = $Ncurses.refresh()
15 val _ = $Ncurses.getch()
16 val () = $Ncurses.endwin(window)
17 }