gonzui


Format: Advanced Search

tkernel_2/etc/sysdepend/cpu/em1d/makeifdrv.plbare sourcepermlink (0.02 seconds)

Search this content:

    1: #! /usr/bin/perl
    2: #
    3: # ----------------------------------------------------------------------
    4: #     T-Kernel 2.0 Software Package
    5: #
    6: #     Copyright 2011 by Ken Sakamura.
    7: #     This software is distributed under the latest version of T-License 2.x.
    8: # ----------------------------------------------------------------------
    9: #
   10: #     Released by T-Engine Forum(http://www.t-engine.org/) at 2011/05/17.
   11: #     Modified by T-Engine Forum at 2014/07/14.
   12: #     Modified by TRON Forum(http://www.tron.org/) at 2015/06/01.
   13: #
   14: # ----------------------------------------------------------------------
   15: #
   16: 
   17: 
   18: #
   19: #       makeifdrv.pl
   20: #
   21: #       generate driver interface library for EM1-D512
   22: #
   23: 
   24: sub makelibdrv
   25: {
   26:         print LIB <<EndOfExtIfLibBody;
   27: #include <machine.h>
   28: #include <tk/sysdef.h>
   29: #include "$fn_h"
   30: 
   31:         .text
   32:         .balign        4
   33:         .globl Csym(${func})
   34:         .type  Csym(${func}), %function
   35: Csym(${func}):
   36:         stmfd  sp!, {r0-r3}
   37:         mov    r0, sp
   38:         stmfd  sp!, {lr}
   39:         ldr    ip, =${prefix}_${Func}_FN
   40:         swi    SWI_SVC
   41:         ldmfd  sp!, {lr}
   42:         add    sp, sp, #4*4
   43:         bx     lr
   44: 
   45: EndOfExtIfLibBody
   46: }
   47: 
   48: 1;