Mercurial > lcfOS
comparison kernel/arch/vexpressA9.c3 @ 353:b8ad45b3a573
Started with strings
author | Windel Bouwman |
---|---|
date | Sun, 09 Mar 2014 18:49:10 +0100 |
parents | 899ae3aea803 |
children | 5477e499b039 |
comparison
equal
deleted
inserted
replaced
352:899ae3aea803 | 353:b8ad45b3a573 |
---|---|
1 module arch; | 1 module arch; |
2 | 2 |
3 function void init() | 3 function void init() |
4 { | 4 { |
5 putc(0x65) | |
6 } | |
7 | |
8 function void putc(int c) | |
9 { | |
5 var int *UART0DR; | 10 var int *UART0DR; |
6 UART0DR = cast<int*>(0x10009000); // UART0 DR register | 11 UART0DR = cast<int*>(0x10009000); // UART0 DR register |
7 *UART0DR = 0x65; | 12 *UART0DR = c; |
8 } | 13 } |
9 | 14 |
10 function void halt() | 15 function void halt() |
11 { | 16 { |
12 } | 17 } |