lib/libc/pc532/gen/alloca.s

   1 /*
   2  * Copyright (c) 1992 Helsinki University of Technology
   3  * All Rights Reserved.
   4  *
   5  * Permission to use, copy, modify and distribute this software and its
   6  * documentation is hereby granted, provided that both the copyright
   7  * notice and this permission notice appear in all copies of the
   8  * software, derivative works or modified versions, and any portions
   9  * thereof, and that both notices appear in supporting documentation.
  10  *
  11  * HELSINKI UNIVERSITY OF TECHNOLOGY ALLOWS FREE USE OF THIS SOFTWARE IN
  12  * ITS "AS IS" CONDITION. HELSINKI UNIVERSITY OF TECHNOLOGY DISCLAIMS ANY
  13  * LIABILITY OF ANY KIND FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE
  14  * USE OF THIS SOFTWARE.
  15  */
  16 /*
  17  * HISTORY
  18  * 29-Apr-92  Johannes Helander (jvh) at Helsinki University of Technology
  19  *      Created.
  20  *
  21  *      $Id: alloca.s,v 1.1 1993/09/17 18:43:46 phil Exp $
  22  */
  23 /*
  24  * Note: Saved registers are accessed through the frame pointer so
  25  * no special magic is required here.
  26  */
  27
  28 #include <machine/asm.h>
  29
  30 ENTRY(alloca)
  31         movd    tos,r2          /* get return address */
  32         movd    tos,r1          /* get length */
  33         sprd    sp,r0
  34         subd    r1,r0
  35         lprd    sp,r0
  36         movd    r1,tos
  37         jump    0(r2)