OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [ecos-3.0/] [packages/] [hal/] [h8300/] [sim_s/] [current/] [src/] [delay_us.S] - Blame information for rev 786

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 786 skrzyp
;;delay_us
2
 
3
#include 
4
 
5
#include 
6
#include 
7
#include 
8
 
9
#define DELAY_COUNT (CYGHWR_HAL_H8300_PROCESSOR_SPEED/1000000)/8*25
10
 
11
//      .file   "delay_us.S"
12
        .h8300s
13
        .text
14
 
15
        .global CYG_LABEL_DEFN(hal_delay_us)
16
CYG_LABEL_DEFN(hal_delay_us):
17
        shlr.l  er0
18
        shlr.l  er0
19
        shlr.l  er0
20
        mov.l   er0,er0
21
1:
22
        ble     4f
23
        dec.l   #1,er0
24
        bra     1b
25
4:
26
        rts

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.