Permalink
Browse files

Minor ARM primitive fixes.

  • Loading branch information...
whitequark committed Sep 10, 2011
1 parent 6330a96 commit 5f718067f7ad22be6643a24e7f11f62713701415
Showing with 2 additions and 2 deletions.
  1. +2 −2 vm/arch/arm/cortex-m3/board-vldiscovery.c
@@ -19,7 +19,7 @@ PRIMITIVE_UNSPEC(#%sleep, arch_sleep, 1)
a1 = decode_int (arg1);
for(a = 0; a < a1; a++) {
- for(b = 0; b < 1000; b++) {
+ for(b = 0; b < 100; b++) {
__asm__ __volatile__("nop");
}
}
@@ -32,7 +32,7 @@ PRIMITIVE_UNSPEC(#%set-led!, arch_set_led, 1)
if (arg1 == OBJ_FALSE) {
GPIOC->ODR &= ~BIT(9);
} else {
- GPIOC->ODR |= ~BIT(9);
+ GPIOC->ODR |= BIT(9);
}
arg1 = OBJ_FALSE;

0 comments on commit 5f71806

Please sign in to comment.