File: errno.c

package info (click to toggle)
hugs98 98.200311-4
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 12,964 kB
  • ctags: 8,084
  • sloc: ansic: 67,521; haskell: 61,497; xml: 4,566; sh: 3,264; cpp: 1,936; yacc: 1,094; makefile: 915; cs: 883; sed: 10
file content (16 lines) | stat: -rw-r--r-- 286 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
/* 
 * (c) The University of Glasgow, 2000-2001
 *
 * $Id: errno.c,v 1.5 2002/09/25 15:24:07 simonmar Exp $
 *
 * GHC Error Number Conversion
 */

#include "HsBase.h"

/* Raw errno */
/* Covers up the fact that on Windows this is a function */

int *ghcErrno(void) {
  return &errno;
}