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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [rtos/] [rtems/] [scripts-ada/] [mkinstalldirs] - Blame information for rev 507

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 30 unneback
#! /bin/sh
2
# mkinstalldirs --- make directory hierarchy
3
# Author: Noah Friedman 
4
# Created: 1993-05-16
5
# Public domain
6
 
7
# $Id: mkinstalldirs,v 1.2 2001-09-27 12:02:52 chris Exp $
8
 
9
errstatus=0
10
 
11
for file
12
do
13
   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
14
   shift
15
 
16
   pathcomp=
17
   for d
18
   do
19
     pathcomp="$pathcomp$d"
20
     case "$pathcomp" in
21
       -* ) pathcomp=./$pathcomp ;;
22
     esac
23
 
24
     if test ! -d "$pathcomp"; then
25
        echo "mkdir $pathcomp"
26
 
27
        mkdir "$pathcomp" || lasterr=$?
28
 
29
        if test ! -d "$pathcomp"; then
30
          errstatus=$lasterr
31
        fi
32
     fi
33
 
34
     pathcomp="$pathcomp/"
35
   done
36
done
37
 
38
exit $errstatus
39
 
40
# mkinstalldirs ends here

powered by: WebSVN 2.1.0

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