/usr/lib/hugs/packages/hugsbase/Hugs/IORef.hs is in hugs 98.200609.21-5.4build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | module Hugs.IORef
( IORef -- abstract, instance of: Eq
, newIORef -- :: a -> IO (IORef a)
, readIORef -- :: IORef a -> IO a
, writeIORef -- :: IORef a -> a -> IO ()
) where
data IORef a -- mutable variables containing values of type a
primitive newIORef "newRef" :: a -> IO (IORef a)
primitive readIORef "getRef" :: IORef a -> IO a
primitive writeIORef "setRef" :: IORef a -> a -> IO ()
primitive eqIORef "eqRef" :: IORef a -> IORef a -> Bool
instance Eq (IORef a) where
(==) = eqIORef
|