/[guile]/guile/guile-core/libguile/gc_os_dep.c
ViewVC logotype

Diff of /guile/guile-core/libguile/gc_os_dep.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by rlb, Wed Apr 16 20:15:37 2003 UTC revision 1.22 by mvo, Thu Nov 13 18:19:02 2003 UTC
# Line 3  Line 3 
3   * Copyright (c) 1991-1995 by Xerox Corporation.  All rights reserved.   * Copyright (c) 1991-1995 by Xerox Corporation.  All rights reserved.
4   * Copyright (c) 1996-1999 by Silicon Graphics.  All rights reserved.   * Copyright (c) 1996-1999 by Silicon Graphics.  All rights reserved.
5   * Copyright (c) 1999 by Hewlett-Packard Company.  All rights reserved.   * Copyright (c) 1999 by Hewlett-Packard Company.  All rights reserved.
6   * Copyright (c) 2000, 2001, 2002 Free Software Foundation   * Copyright (c) 2000, 2001, 2002, 2003 Free Software Foundation
7   *   *
8   * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED   * THIS MATERIAL IS PROVIDED AS IS, WITH ABSOLUTELY NO WARRANTY EXPRESSED
9   * OR IMPLIED.  ANY USE IS AT YOUR OWN RISK.   * OR IMPLIED.  ANY USE IS AT YOUR OWN RISK.
# Line 394  typedef int GC_bool; Line 394  typedef int GC_bool;
394  /* SYSV on an M68K actually means A/UX.                                 */  /* SYSV on an M68K actually means A/UX.                                 */
395  /* The distinction in these cases is usually the stack starting address */  /* The distinction in these cases is usually the stack starting address */
396  # ifndef mach_type_known  # ifndef mach_type_known
397          --> unknown machine type  
398  # endif  void *
399    scm_get_stack_base ()
400    {
401      return NULL;
402    }
403    
404    # else
405                      /* Mapping is: M68K       ==> Motorola 680X0        */                      /* Mapping is: M68K       ==> Motorola 680X0        */
406                      /*             (SUNOS4,HP,NEXT, and SYSV (A/UX),    */                      /*             (SUNOS4,HP,NEXT, and SYSV (A/UX),    */
407                      /*             MACOS and AMIGA variants)            */                      /*             MACOS and AMIGA variants)            */
# Line 1923  void *scm_get_stack_base() Line 1929  void *scm_get_stack_base()
1929  # endif /* ! OS2 */  # endif /* ! OS2 */
1930  # endif /* ! MSWIN32 */  # endif /* ! MSWIN32 */
1931    
1932    #endif /* mach_type_known */
1933  #endif /* ! HAVE_LIBC_STACK_END */  #endif /* ! HAVE_LIBC_STACK_END */

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26