Lisp Interpreter for mbed LPC1768
Lisp Interpreter
(Marc Adler Lisp Interpreter, malisp)
mbed LPC1768 port by Takehisa Oneta (ohneta@gmail.com)
main.cpp@1:a2955606adef, 2016-05-21 (annotated)
- Committer:
- ohneta
- Date:
- Sat May 21 22:26:40 2016 +0000
- Revision:
- 1:a2955606adef
- Parent:
- 0:e9a7a38d9ad3
??commit
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
ohneta | 0:e9a7a38d9ad3 | 1 | /** |
ohneta | 0:e9a7a38d9ad3 | 2 | * |
ohneta | 0:e9a7a38d9ad3 | 3 | */ |
ohneta | 0:e9a7a38d9ad3 | 4 | #include "mbed.h" |
ohneta | 0:e9a7a38d9ad3 | 5 | #include <stdio.h> |
ohneta | 0:e9a7a38d9ad3 | 6 | #include "malisp.h" |
ohneta | 0:e9a7a38d9ad3 | 7 | |
ohneta | 0:e9a7a38d9ad3 | 8 | Serial pc(USBTX, USBRX); |
ohneta | 0:e9a7a38d9ad3 | 9 | DigitalOut led1(LED1); |
ohneta | 0:e9a7a38d9ad3 | 10 | DigitalOut led2(LED2); |
ohneta | 0:e9a7a38d9ad3 | 11 | DigitalOut led3(LED3); |
ohneta | 0:e9a7a38d9ad3 | 12 | DigitalOut led4(LED4); |
ohneta | 0:e9a7a38d9ad3 | 13 | |
ohneta | 0:e9a7a38d9ad3 | 14 | //int main(int argc, const char * argv[]) { |
ohneta | 0:e9a7a38d9ad3 | 15 | int main() { |
ohneta | 0:e9a7a38d9ad3 | 16 | pc.baud(115200); |
ohneta | 0:e9a7a38d9ad3 | 17 | led1 = led2 = led3 = led4 = 0; |
ohneta | 0:e9a7a38d9ad3 | 18 | |
ohneta | 0:e9a7a38d9ad3 | 19 | malisp_main(); |
ohneta | 0:e9a7a38d9ad3 | 20 | return 0; |
ohneta | 0:e9a7a38d9ad3 | 21 | } |