Porting GHC to Barrelfish: old-time.patch

File old-time.patch, 1.8 KB (added by rmcilroy, 5 years ago)

Patch for old-time library

  • config.sub

    Wed Aug 11 10:57:17 BST 2010  [email protected]
      * Checkpoint GHC on Barrelfish work 
      
      Now at the stage where we can build and run a helloword Haskell application on Barrelfish.
      
    Thu Jul 29 14:56:51 BST 2010  [email protected]
      * Changes to get ghc building against Barrelfish
    diff -rN -u old-old-time/config.sub new-old-time/config.sub
    old new  
    44#   2000, 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation,
    55#   Inc.
    66
    7 timestamp='2006-07-02'
     7timestamp='2010-08-10'
    88
    99# This file is (in principle) common to ALL GNU software.
    1010# The presence of a machine in this file suggests that SOME GNU software
     
    13441344        -zvmoe)
    13451345                os=-zvmoe
    13461346                ;;
     1347        -barrelfish)
     1348                os=-barrelfish
     1349                ;;
    13471350        -none)
    13481351                ;;
    13491352        *)
  • include/HsTime.h

    diff -rN -u old-old-time/include/HsTime.h new-old-time/include/HsTime.h
    old new  
    1414#undef PACKAGE_TARNAME
    1515#undef PACKAGE_VERSION
    1616
     17
    1718#if HAVE_GETTIMEOFDAY
    1819#  if HAVE_SYS_TIME_H
    1920#   include <sys/time.h>
  • System/Time.hsc

    diff -rN -u old-old-time/System/Time.hsc new-old-time/System/Time.hsc
    old new  
    357357
    358358zone   :: Ptr CTm -> IO (Ptr CChar)
    359359gmtoff :: Ptr CTm -> IO CLong
    360 #if HAVE_TM_ZONE
     360#if barrelfish_HOST_OS
     361zone x      = return (nullPtr)
     362gmtoff x    = return 0
     363#elif HAVE_TM_ZONE
    361364zone x      = (#peek struct tm,tm_zone) x
    362365gmtoff x    = (#peek struct tm,tm_gmtoff) x
    363 
    364366#else /* ! HAVE_TM_ZONE */
    365367# if HAVE_TZNAME || defined(_WIN32)
    366368#  if cygwin32_HOST_OS