diff options
author | Mark H Weaver <mhw@netris.org> | 2011-01-25 18:29:47 -0500 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-01-28 12:16:16 +0100 |
commit | b56c252b52adc73bf154551e0cc3462548771ce3 (patch) | |
tree | 0f7d5934e27e84efd5f2dce330353adaff63203c /libguile/posix.c | |
parent | 92a70bcf299632e5b19f86ab4629d4e24a09a7e1 (diff) | |
download | guile-b56c252b52adc73bf154551e0cc3462548771ce3.tar.gz |
Fix incorrect FUNC_NAME for scm_current_processor_count
* libguile/posix.c (scm_current_processor_count):
Fix incorrect FUNC_NAME (was s_scm_total_processor_count)
Diffstat (limited to 'libguile/posix.c')
-rw-r--r-- | libguile/posix.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/posix.c b/libguile/posix.c index 95beb6e3e..939e2488d 100644 --- a/libguile/posix.c +++ b/libguile/posix.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +/* Copyright (C) 1995,1996,1997,1998,1999,2000,2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -2015,7 +2015,7 @@ SCM_DEFINE (scm_current_processor_count, "current-processor-count", 0, 0, 0, "processors available to the current process. See\n" "@code{setaffinity} and @code{getaffinity} for more\n" "information.\n") -#define FUNC_NAME s_scm_total_processor_count +#define FUNC_NAME s_scm_current_processor_count { return scm_from_ulong (num_processors (NPROC_CURRENT)); } |