From e556b972d1ad64453b3372b486191e2a59c91dda Mon Sep 17 00:00:00 2001 From: "Christian A. Weber" Date: Fri, 15 May 1992 03:21:10 +0000 Subject: An neue Include-Files angepasst --- Source/SaveClip.S | 29 +++++++++++++++-------------- 1 file changed, 15 insertions(+), 14 deletions(-) (limited to 'Source/SaveClip.S') diff --git a/Source/SaveClip.S b/Source/SaveClip.S index eb2fbaf..ecc4925 100644 --- a/Source/SaveClip.S +++ b/Source/SaveClip.S @@ -1,13 +1,13 @@ ** -** $Id: $ -** $Revision: $ +** $Id: SaveClip.S,v 1.1 92/05/12 22:26:45 chris Exp $ +** $Revision: 1.1 $ ** ** $Filename: SaveClip.S $ -** $Author: Christian A. Weber $ +** $Author: chris $ ** $Release: 19.1 $ -** $Date: 92/05/11 21:11:27 $ +** $Date: 92/05/12 22:26:45 $ ** -** iff.library/IFFLib_SaveClip +** iff.library/IFFL_SaveClip ** ** COPYRIGHT (C) 1987-1992 BY CHRISTIAN A. WEBER, BRUGGERWEG 2, ** CH-8037 ZUERICH, SWITZERLAND. ALL RIGHTS RESERVED. NO PART @@ -17,7 +17,7 @@ ** - IDNT IFFLib_SaveClip + IDNT IFFL_SaveClip SECTION text,CODE INCLUDE "IFFLib.i" @@ -26,13 +26,13 @@ XDEF SaveClipFunc -******* iff.library/IFFLib_SaveClip ***************************************** +******* iff.library/IFFL_SaveClip ******************************************* * * NAME -* IFFLib_SaveClip -- save a part of a BitMap as an IFF-file +* IFFL_SaveClip -- save a part of a BitMap as an IFF-file * * SYNOPSIS -* result = IFFLib_SaveClip +* result = IFFL_SaveClip * D0 ( filename, bitmap, coltab, flags, xoff, yoff, width, height ) * A0 A1 A2 D0 D1 D2 D3 D4 * @@ -54,18 +54,18 @@ * height - height in lines of the rectangle * * RESULTS -* Non-zero if successful, 0 if error, Call IFFLib_IFFError() to +* Non-zero if successful, 0 if error, Call IFFL_IFFError() to * know more about the reason of the failure * * NOTE -* This routine needs 620 bytes of stack space +* This routine needs 650 bytes of stack space * * BUGS * The width of the rectangle will be rounded to WORD boundaries, * because DPAINT wants it! * * SEE ALSO -* IFFLib_SaveBitMap() +* IFFL_SaveBitMap() * ***************************************************************************** @@ -191,7 +191,7 @@ SaveClipFunc: movem.l d2-d7/a2-a6,-(SP) nocmap: move.l d6,d1 ; FileName move.l #MODE_NEWFILE,d2 - movea.l ib_DOSBase(a5),a6 + movea.l iffb_DOSBase(a5),a6 JSRLIB Open move.l d0,d7 ; D7 : FileHandle beq writeerror @@ -268,7 +268,7 @@ nocmap: move.l d6,d1 ; FileName writeerror: move.l d7,d1 ; File beq.s 1$ ; schon / nochzu! JSRLIB Close -1$: moveq #IFF_WRITEERROR,d0 +1$: moveq #IFFL_ERROR_WRITE,d0 bsr SetError ; Error setzen, D0 := 0 SaveClip_End: adda.w #sb_datasize,SP ; Speicher wirder freigeben @@ -487,4 +487,5 @@ CountEq: move.l a0,-(SP) 3$: move.l (SP)+,a0 rts + END -- cgit v1.2.3