OSFileHandle subclass:#Win32FILEHandle

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	category:'OS-Windows'

!

!Win32FILEHandle primitiveDefinitions!

%{

#include <stdio.h>

%}

! !

!Win32FILEHandle methodsFor:'finalization'!

disposed

    "a file handle was garbage collected - close the underlying file"

%{

    FILE *f = (FILE *)(__externalAddressVal(self));

    if (f) {

        __externalAddressVal(self) = NULL;

        fclose(f);

    }

%}

! !

!Win32FILEHandle methodsFor:'release'!

close

    "close the file"

%{

    FILE *f = (FILE *)(__externalAddressVal(self));

    if (f) {

        __externalAddressVal(self) = NULL;

        fclose(f);

    }

%}.

    Lobby unregister:self

! !

!Win32FILEHandle class methodsFor:'documentation'!

version

    ^ '$Header: /cvs/stx/stx/libbasic/Win32FILEHandle.st,v 1.2 2001-12-11 16:02:07 cg Exp $'

! !