mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

	Commit message (Expand)	Author	Age	Files	Lines
*	7080	Kartik Agaram	2020-10-20	4	-6/+79
*	7079	Kartik Agaram	2020-10-19	4	-1/+96
*	7078	Kartik Agaram	2020-10-19	1	-1/+39
*	7077 - tile: render function list	Kartik Agaram	2020-10-19	2	-12/+53
*	7066 - tile: some more primitives for testing	Kartik Agaram	2020-10-19	3	-0/+93
*	7065	Kartik Agaram	2020-10-19	1	-4/+5
*	7064	Kartik Agaram	2020-10-19	1	-16/+25
*	7063 - tile: scaffolding for defining functions	Kartik Agaram	2020-10-18	3	-6/+121
*	7062	Kartik Agaram	2020-10-18	1	-1/+1
*	7061	Kartik Agaram	2020-10-18	2	-4/+4
*	7060 - tile: renaming variables now works	Kartik Agaram	2020-10-18	1	-9/+10
*	7059	Kartik Agaram	2020-10-18	3	-21/+139
*	7058	Kartik Agaram	2020-10-18	3	-23/+97
*	7057 - tile: back to names	Kartik Agaram	2020-10-18	1	-5/+44
*	7056 - orange-pink	Kartik Agaram	2020-10-18	1	-3/+8
*	7055	Kartik Agaram	2020-10-18	1	-4/+8
*	7054	Kartik Agaram	2020-10-18	1	-0/+49
*	7053	Kartik Agaram	2020-10-17	4	-10/+100
*	7052	Kartik Agaram	2020-10-17	2	-4/+4
*	7051	Kartik Agaram	2020-10-17	1	-1/+3
*	7050	Kartik Agaram	2020-10-17	1	-2/+13
*	7049	Kartik Agaram	2020-10-17	1	-3/+1
*	7048	Kartik Agaram	2020-10-17	1	-2/+2
*	7047	Kartik Agaram	2020-10-17	1	-0/+24
*	7046 - start of flow for naming words	Kartik Agaram	2020-10-17	2	-2/+126
*	7045	Kartik Agaram	2020-10-16	1	-37/+42
*	7044	Kartik Agaram	2020-10-16	1	-286/+286
*	7043 - the REPL is dead; long live the IVL	Kartik Agaram	2020-10-16	1	-0/+8
*	7042	Kartik Agaram	2020-10-15	1	-4/+12
*	7039	Kartik Agaram	2020-10-15	1	-1/+0
*	7038	Kartik Agaram	2020-10-15	1	-11/+25
*	7037	Kartik Agaram	2020-10-15	2	-7/+6
*	7036	Kartik Agaram	2020-10-15	1	-6/+1
*	7035	Kartik Agaram	2020-10-15	2	-4/+6
*	7034	Kartik Agaram	2020-10-15	2	-3/+8
*	7032	Kartik Agaram	2020-10-14	6	-162/+171
*	7031	Kartik Agaram	2020-10-14	1	-1/+1
*	7030	Kartik Agaram	2020-10-14	1	-2/+2
*	7029	Kartik Agaram	2020-10-14	1	-4/+7
*	7021	Kartik Agaram	2020-10-14	2	-2/+6
*	7020	Kartik Agaram	2020-10-14	3	-182/+89
*	7019	Kartik Agaram	2020-10-14	1	-3/+3
*	7018 - tile: tweak spacing between stacks	Kartik Agaram	2020-10-13	2	-17/+19
*	7017	Kartik Agaram	2020-10-13	1	-14/+14
*	7016 - raw addrs shouldn't escape functions	Kartik Agaram	2020-10-13	1	-9/+5
*	7015 - bugfix in column width computation	Kartik Agaram	2020-10-13	2	-9/+15
*	7014	Kartik Agaram	2020-10-12	2	-5/+28
*	7013	Kartik Agaram	2020-10-12	3	-50/+1
*	7012	Kartik Agaram	2020-10-12	1	-0/+0
*	7011 - tile: keep garbage out of the stack	Kartik Agaram	2020-10-12	2	-13/+14

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> <title>Mu - 070display.cc</title> <meta name="Generator" content="Vim/7.4"> <meta name="plugin-version" content="vim7.4_v1"> <meta name="syntax" content="cpp"> <meta name="settings" content="use_css,pre_wrap,no_foldcolumn,expand_tabs,prevent_copy="> <meta name="colorscheme" content="minimal"> <style type="text/css">  </style> <script type='text/javascript'>  </script> </head> <body> <pre id='vimCodeElement'> //: Take charge of the text-mode display and console. :(before "End Globals") // uncomment to debug console programs //? ofstream LOG("log.txt"); //:: Display management :(before "End Globals") long long int Display_row = 0, Display_column = 0; bool Autodisplay = true; :(before "End Primitive Recipe Declarations") OPEN_CONSOLE, :(before "End Primitive Recipe Numbers") Recipe_number["open-console"] = OPEN_CONSOLE; //? cerr << "open-console: " << OPEN_CONSOLE << '\n'; //? 1 :(before "End Primitive Recipe Implementations") case OPEN_CONSOLE: { tb_init(); Display_row = Display_column = 0; break; } :(before "End Primitive Recipe Declarations") CLOSE_CONSOLE, :(before "End Primitive Recipe Numbers") Recipe_number["close-console"] = CLOSE_CONSOLE; :(before "End Primitive Recipe Implementations") case CLOSE_CONSOLE: { tb_shutdown(); //? Trace_stream->dump_layer = "all"; //? 1 break; } :(before "End Teardown") tb_shutdown(); :(before "End Primitive Recipe Declarations") CLEAR_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["clear-display"] = CLEAR_DISPLAY; :(before "End Primitive Recipe Implementations") case CLEAR_DISPLAY: { tb_clear(); Display_row = Display_column = 0; break; } :(before "End Primitive Recipe Declarations") CLEAR_LINE_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["clear-line-on-display"] = CLEAR_LINE_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case CLEAR_LINE_ON_DISPLAY: { long long int width = tb_width(); for (long long int x = Display_column; x < width; ++x) { tb_change_cell(x, Display_row, ' ', TB_WHITE, TB_BLACK); } tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); break; } :(before "End Primitive Recipe Declarations") PRINT_CHARACTER_TO_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["print-character-to-display"] = PRINT_CHARACTER_TO_DISPLAY; :(before "End Primitive Recipe Implementations") case PRINT_CHARACTER_TO_DISPLAY: { int h=tb_height(), w=tb_width(); long long int height = (h >= 0) ? h : 0; long long int width = (w >= 0) ? w : 0; assert(scalar(ingredients.at(0))); long long int c = ingredients.at(0).at(0); //? tb_shutdown(); //? 1 //? cerr << "AAA " << c << ' ' << (int)'\n' << ' ' << (int)'\r' << '\n'; //? 1 //? exit(1); //? 1 if (c == '\n' || c == '\r') { if (Display_row < height-1) { Display_column = 0; ++Display_row; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } if (c == '\b') { if (Display_column > 0) { tb_change_cell(Display_column-1, Display_row, ' ', TB_WHITE, TB_BLACK); --Display_column; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } int color = TB_BLACK; if (SIZE(ingredients) > 1) { assert(scalar(ingredients.at(1))); color = ingredients.at(1).at(0); //? tb_shutdown(); //? 1 //? cerr << "AAA " << color << '\n'; //? 1 //? exit(1); //? 1 } tb_change_cell(Display_column, Display_row, c, color, TB_BLACK); if (Display_column < width-1) { ++Display_column; tb_set_cursor(Display_column, Display_row); } if (Autodisplay) tb_present(); break; } :(before "End Primitive Recipe Declarations") CURSOR_POSITION_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["cursor-position-on-display"] = CURSOR_POSITION_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case CURSOR_POSITION_ON_DISPLAY: { products.resize(2); products.at(0).push_back(Display_row); products.at(1).push_back(Display_column); break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-on-display"] = MOVE_CURSOR_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_ON_DISPLAY: { assert(scalar(ingredients.at(0))); Display_row = ingredients.at(0).at(0); assert(scalar(ingredients.at(1))); Display_column = ingredients.at(1).at(0); tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_DOWN_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-down-on-display"] = MOVE_CURSOR_DOWN_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_DOWN_ON_DISPLAY: { int h=tb_height(); long long int height = (h >= 0) ? h : 0; if (Display_row < height-1) { Display_row++; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_UP_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-up-on-display"] = MOVE_CURSOR_UP_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_UP_ON_DISPLAY: { if (Display_row > 0) { Display_row--; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_RIGHT_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-right-on-display"] = MOVE_CURSOR_RIGHT_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_RIGHT_ON_DISPLAY: { int w=tb_width(); long long int width = (w >= 0) ? w : 0; if (Display_column < width-1) { Display_column++; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_LEFT_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-left-on-display"] = MOVE_CURSOR_LEFT_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_LEFT_ON_DISPLAY: { if (Display_column > 0) { Display_column--; tb_set_cursor(Display_column, Display_row); if (Autodisplay) tb_present(); } break; } :(before "End Primitive Recipe Declarations") DISPLAY_WIDTH, :(before "End Primitive Recipe Numbers") Recipe_number["display-width"] = DISPLAY_WIDTH; :(before "End Primitive Recipe Implementations") case DISPLAY_WIDTH: { products.resize(1); products.at(0).push_back(tb_width()); break; } :(before "End Primitive Recipe Declarations") DISPLAY_HEIGHT, :(before "End Primitive Recipe Numbers") Recipe_number["display-height"] = DISPLAY_HEIGHT; :(before "End Primitive Recipe Implementations") case DISPLAY_HEIGHT: { products.resize(1); products.at(0).push_back(tb_height()); break; } :(before "End Primitive Recipe Declarations") HIDE_CURSOR_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["hide-cursor-on-display"] = HIDE_CURSOR_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case HIDE_CURSOR_ON_DISPLAY: { tb_set_cursor(TB_HIDE_CURSOR, TB_HIDE_CURSOR); break; } :(before "End Primitive Recipe Declarations") SHOW_CURSOR_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["show-cursor-on-display"] = SHOW_CURSOR_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case SHOW_CURSOR_ON_DISPLAY: { tb_set_cursor(Display_row, Display_column); break; } :(before "End Primitive Recipe Declarations") HIDE_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["hide-display"] = HIDE_DISPLAY; :(before "End Primitive Recipe Implementations") case HIDE_DISPLAY: { Autodisplay = false; break; } :(before "End Primitive Recipe Declarations") SHOW_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["show-display"] = SHOW_DISPLAY; :(before "End Primitive Recipe Implementations") case SHOW_DISPLAY: { Autodisplay = true; tb_present(); break; } //:: Keyboard/mouse management :(before "End Primitive Recipe Declarations") WAIT_FOR_SOME_INTERACTION, :(before "End Primitive Recipe Numbers") Recipe_number["wait-for-some-interaction"] = WAIT_FOR_SOME_INTERACTION; :(before "End Primitive Recipe Implementations") case WAIT_FOR_SOME_INTERACTION: { tb_event event; tb_poll_event(&event); break; } :(before "End Primitive Recipe Declarations") CHECK_FOR_INTERACTION, :(before "End Primitive Recipe Numbers") Recipe_number["check-for-interaction"] = CHECK_FOR_INTERACTION; :(before "End Primitive Recipe Implementations") case CHECK_FOR_INTERACTION: { products.resize(2); // result and status tb_event event; int event_type = tb_peek_event(&event, 5/*ms*/); if (event_type == TB_EVENT_KEY && event.ch) { products.at(0).push_back(/*text event*/0); products.at(0).push_back(event.ch); products.at(0).push_back(0); products.at(0).push_back(0); products.at(1).push_back(/*found*/true); break; } // treat keys within ascii as unicode characters if (event_type == TB_EVENT_KEY && event.key < 0xff) { products.at(0).push_back(/*text event*/0); if (event.key == TB_KEY_CTRL_C) tb_shutdown(), exit(1); if (event.key == TB_KEY_BACKSPACE2) event.key = TB_KEY_BACKSPACE; if (event.key == TB_KEY_CARRIAGE_RETURN) event.key = TB_KEY_NEWLINE; products.at(0).push_back(event.key); products.at(0).push_back(0); products.at(0).push_back(0); products.at(1).push_back(/*found*/true); break; } // keys outside ascii aren't unicode characters but arbitrary termbox inventions if (event_type == TB_EVENT_KEY) { products.at(0).push_back(/*keycode event*/1); products.at(0).push_back(event.key); products.at(0).push_back(0); products.at(0).push_back(0); products.at(1).push_back(/*found*/true); break; } if (event_type == TB_EVENT_MOUSE) { //? tb_shutdown(); //? 1 //? cerr << "AAA\n"; //? 1 products.at(0).push_back(/*touch event*/2); products.at(0).push_back(event.key); // which button, etc. products.at(0).push_back(event.y); // row products.at(0).push_back(event.x); // column products.at(1).push_back(/*found*/true); break; } // ignore TB_EVENT_RESIZE events for now products.at(0).push_back(0); products.at(0).push_back(0); products.at(0).push_back(0); products.at(0).push_back(0); products.at(1).push_back(/*found*/false); break; } </pre> </body> </html>