Mercurial > lcfOS
view user/screen.c3 @ 382:0c44e494ef58
Made lexer more generic
author | Windel Bouwman |
---|---|
date | Sun, 27 Apr 2014 12:24:21 +0200 |
parents | 084cccaa5deb |
children |
line wrap: on
line source
module screen; import ipc; const int num_cols = 80; const int num_rows = 25; var int* vidmem; function void clear() { var int row, col; for (row = 0; row < num_rows; rows++) { for (col = 0; col < num_cols; cols=cols+1) { *vidmem = 0x20; } } } function void main() { // Initialize display clear(); while (true) { var ipc.Msg msg; ipc.receive_message(&msg); } }