home *** CD-ROM | disk | FTP | other *** search
- /***************************************************************************
- * *
- * Squish Developers Kit Source, Version 2.00 *
- * Copyright 1989-1994 by SCI Communications. All rights reserved. *
- * *
- * USE OF THIS FILE IS SUBJECT TO THE RESTRICTIONS CONTAINED IN THE *
- * SQUISH DEVELOPERS KIT LICENSING AGREEMENT IN SQDEV.PRN. IF YOU DO NOT *
- * FIND THE TEXT OF THIS AGREEMENT IN THE AFOREMENTIONED FILE, OR IF YOU *
- * DO NOT HAVE THIS FILE, YOU SHOULD IMMEDIATELY CONTACT THE AUTHOR AT *
- * ONE OF THE ADDRESSES LISTED BELOW. IN NO EVENT SHOULD YOU PROCEED TO *
- * USE THIS FILE WITHOUT HAVING ACCEPTED THE TERMS OF THE SQUISH *
- * DEVELOPERS KIT LICENSING AGREEMENT, OR SUCH OTHER AGREEMENT AS YOU ARE *
- * ABLE TO REACH WITH THE AUTHOR. *
- * *
- * You can contact the author at one of the address listed below: *
- * *
- * Scott Dudley FidoNet 1:249/106 *
- * 777 Downing St. Internet sjd@f106.n249.z1.fidonet.org *
- * Kingston, Ont. CompuServe >INTERNET:sjd@f106.n249.z1.fidonet.org *
- * Canada K7M 5N3 BBS 1-613-634-3058, V.32bis *
- * *
- ***************************************************************************/
-
- #include "prog.h"
- #include "progprot.h"
-
- #define INCL_DOS
- #include <os2.h>
-
- int _fast lock(int fh, long offset, long len)
- {
- FILELOCK fl;
-
- fl.lOffset=offset;
- fl.lRange=len;
-
- return (DosSetFileLocks((HFILE)fh, NULL, &fl, 0, 0)==0 ? 0 : -1);
- }
-
- int _fast unlock(int fh, long offset, long len)
- {
- FILELOCK fl;
-
- fl.lOffset=offset;
- fl.lRange=len;
-
- return (DosSetFileLocks((HFILE)fh, &fl, NULL, 0, 0)==0 ? 0 : -1);
- }
-
-
-