File: fp-platform

package info (click to toggle)
hugs98 98.200609.21-5.3
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd, wheezy
  • size: 41,872 kB
  • ctags: 8,927
  • sloc: haskell: 118,978; xml: 61,802; ansic: 46,695; sh: 8,750; cpp: 6,033; makefile: 2,661; yacc: 1,111; cs: 883; sed: 10
file content (36 lines) | stat: -rwxr-xr-x 794 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
#! /bin/sh

# canonicalize platform names (approximately as GHC does)

for platform
do
	cpu="`echo $platform | sed 's/^\([^-]*\)-\([^-]*\)-\([^-]*\).*/\1/'`"
	vendor="`echo $platform | sed 's/^\([^-]*\)-\([^-]*\)-\([^-]*\).*/\2/'`"
	os="`echo $platform | sed 's/^\([^-]*\)-\([^-]*\)-\([^-]*\).*/\3/'`"

	case "$cpu" in
	i[3456]86*) cpu=i386 ;;
	esac

	case "$os" in
	aix*) os=aix ;;
	cygwin*) os=cygwin32 ;;
	darwin*) os=darwin ;;
	freebsd2*) os=freebsd2 ;;
	freebsd*) os=freebsd ;;
	hpux*) os=hpux ;;
	irix*) os=irix ;;
	linuxaout*) os=linuxaout ;;
	linux*) os=linux ;;
	mingw32*) os=mingw32 ;;
	netbsd*) os=netbsd ;;
	openbsd*) os=openbsd ;;
	osf[12]*) os=osf1 ;;
	osf*) os=osf3 ;;
	solaris2*) os=solaris2 ;;
	sunos4*) os=sunos4 ;;
	ultrix*) os=ultrix ;;
	esac

	echo "$cpu-$vendor-$os"
done