Mercurial > lcfOS
view user/screen.c3 @ 366:39bf68bf1891
Fix sample tests and deterministic build
author | Windel Bouwman |
---|---|
date | Fri, 21 Mar 2014 09:43:01 +0100 |
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); } }