Porting GHC to Barrelfish: process.patch

File process.patch, 2.2 KB (added by rmcilroy, 4 years ago)

Patch for process library

  • cbits/runProcess.c

    Wed Aug 11 10:57:51 BST 2010  rmcilroy@microsoft.com
      * 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:57:07 BST 2010  rmcilroy@microsoft.com
      * Changes to get ghc building against Barrelfish
    diff -rN -u old-process/cbits/runProcess.c new-process/cbits/runProcess.c
    old new  
    1414 
    1515#include "runProcess.h" 
    1616 
    17 #if !(defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)) 
     17#if defined(barrelfish_HOST_OS) 
     18 
     19extern ProcHandle runInteractiveProcess( char *const args[],  
     20                                         char *workingDirectory,  
     21                                         char **environment,  
     22                                         int fdStdIn, int fdStdOut, int fdStdErr, 
     23                                         int *pfdStdInput,  
     24                                         int *pfdStdOutput,  
     25                                         int *pfdStdError, 
     26                                         int set_inthandler, long inthandler,  
     27                                         int set_quithandler, long quithandler, 
     28                                         int close_fds) 
     29{ 
     30    printf("NYI runInteractiveProcess\n"); 
     31    return NULL; 
     32} 
     33 
     34 
     35extern int terminateProcess( ProcHandle handle ) 
     36{ 
     37    printf("NYI terminateProcess\n"); 
     38    return -1; 
     39} 
     40 
     41extern int getProcessExitCode( ProcHandle handle, int *pExitCode ) 
     42{ 
     43    printf("NYI getProcessExitCode\n"); 
     44    return -1; 
     45} 
     46 
     47extern int waitForProcess( ProcHandle handle ) 
     48{ 
     49    printf("NYI waitForProcess\n"); 
     50    return -1; 
     51} 
     52 
     53#elif !(defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32)) 
    1854 
    1955#include "execvpe.h" 
    2056 
  • config.sub

    diff -rN -u old-process/config.sub new-process/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        *)