head	1.1;
access;
symbols
	pkgsrc-2026Q1:1.1.0.16
	pkgsrc-2026Q1-base:1.1
	pkgsrc-2025Q4:1.1.0.14
	pkgsrc-2025Q4-base:1.1
	pkgsrc-2025Q3:1.1.0.12
	pkgsrc-2025Q3-base:1.1
	pkgsrc-2025Q2:1.1.0.10
	pkgsrc-2025Q2-base:1.1
	pkgsrc-2025Q1:1.1.0.8
	pkgsrc-2025Q1-base:1.1
	pkgsrc-2024Q4:1.1.0.6
	pkgsrc-2024Q4-base:1.1
	pkgsrc-2024Q3:1.1.0.4
	pkgsrc-2024Q3-base:1.1
	pkgsrc-2024Q2:1.1.0.2
	pkgsrc-2024Q2-base:1.1;
locks; strict;
comment	@# @;


1.1
date	2024.05.05.12.39.47;	author pho;	state Exp;
branches;
next	;
commitid	a7eXR04YYb0AdO8F;


desc
@@


1.1
log
@sysutils/hs-disk-free-space: Use the correct symbol for statvfs(2) on NetBSD
@
text
@$NetBSD$

Use capi calling convention. On NetBSD statvfs(2) isn't a regular symbol in
libc.

--- System/DiskSpace.hsc.orig	2024-05-05 12:36:08.046949584 +0000
+++ System/DiskSpace.hsc
@@@@ -1,3 +1,4 @@@@
+{-# LANGUAGE CApiFFI #-}
 {-# LANGUAGE CPP #-}
 
 {- |
@@@@ -20,7 +21,7 @@@@ import Foreign.C
 
 #include <sys/statvfs.h>
 
-foreign import ccall safe statvfs :: CString -> Ptr a -> IO CInt
+foreign import capi safe "sys/statvfs.h statvfs" statvfs :: CString -> Ptr a -> IO CInt
 
 type FsBlkCnt = #type fsblkcnt_t
 
@