From 02f1f6b7d659bb06e87a3fcc697f37b0bc74c715 Mon Sep 17 00:00:00 2001 Message-Id: <02f1f6b7d659bb06e87a3fcc697f37b0bc74c715.1714122558.git.mdw@distorted.org.uk> From: Mark Wooding Date: Sun, 2 Jul 2000 15:22:07 +0000 Subject: [PATCH] Fix licence text. Change to matinv to mark inputs as constants. Organization: Straylight/Edgeware From: Mark Wooding --- matrix.c | 11 +++++++---- matrix.h | 11 +++++++---- 2 files changed, 14 insertions(+), 8 deletions(-) diff --git a/matrix.c b/matrix.c index 88f4cb7..c164275 100644 --- a/matrix.c +++ b/matrix.c @@ -1,6 +1,6 @@ /* -*-c-*- * - * $Id: matrix.c,v 1.1 2000/05/21 11:28:30 mdw Exp $ + * $Id: matrix.c,v 1.2 2000/07/02 15:22:07 mdw Exp $ * * Matrix arithmetic mod %$2^{24}$% * @@ -30,7 +30,7 @@ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN - * NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, + * NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) @@ -49,6 +49,9 @@ /*----- Revision history --------------------------------------------------* * * $Log: matrix.c,v $ + * Revision 1.2 2000/07/02 15:22:07 mdw + * Fix licence text. Change to matinv to mark inputs as constants. + * * Revision 1.1 2000/05/21 11:28:30 mdw * Initial check-in. * @@ -99,7 +102,7 @@ void matmul(uint24 *d, const uint24 *a, const uint24 *b, /* --- @matinv@ --- * * * Arguments: @uint24 *d@ = pointer to destination matrix - * @uint24 *a@ = pointer to operand matrix + * @const uint24 *a@ = pointer to operand matrix * @unsigned x, y@ = dimensions of operand matrix * * Returns: Zero if the matrix was successfully inverted, %$-1$% if the @@ -108,7 +111,7 @@ void matmul(uint24 *d, const uint24 *a, const uint24 *b, * Use: Computes the mod %$2^{24}$% inverse of a square matrix. */ -int matinv(uint24 *d, uint24 *a, unsigned x, unsigned y) +int matinv(uint24 *d, const uint24 *a, unsigned x, unsigned y) { unsigned i, j, k; uint24 *aa; diff --git a/matrix.h b/matrix.h index 4c8d948..a5ff8d6 100644 --- a/matrix.h +++ b/matrix.h @@ -1,6 +1,6 @@ /* -*-c-*- * - * $Id: matrix.h,v 1.1 2000/05/21 11:28:30 mdw Exp $ + * $Id: matrix.h,v 1.2 2000/07/02 15:22:07 mdw Exp $ * * Matrix arithmetic mod %$2^{24}$% * @@ -30,7 +30,7 @@ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN - * NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, + * NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) @@ -49,6 +49,9 @@ /*----- Revision history --------------------------------------------------* * * $Log: matrix.h,v $ + * Revision 1.2 2000/07/02 15:22:07 mdw + * Fix licence text. Change to matinv to mark inputs as constants. + * * Revision 1.1 2000/05/21 11:28:30 mdw * Initial check-in. * @@ -87,7 +90,7 @@ extern void matmul(uint24 */*d*/, const uint24 */*a*/, const uint24 */*b*/, /* --- @matinv@ --- * * * Arguments: @uint24 *d@ = pointer to destination matrix - * @uint24 *a@ = pointer to operand matrix + * @const uint24 *a@ = pointer to operand matrix * @unsigned x, y@ = dimensions of operand matrix * * Returns: Zero if the matrix was successfully inverted, %$-1$% if the @@ -96,7 +99,7 @@ extern void matmul(uint24 */*d*/, const uint24 */*a*/, const uint24 */*b*/, * Use: Computes the mod %$2^{24}$% inverse of a square matrix. */ -extern int matinv(uint24 */*d*/, uint24 */*a*/, +extern int matinv(uint24 */*d*/, const uint24 */*a*/, unsigned /*x*/, unsigned /*y*/); /*----- That's all, folks -------------------------------------------------*/ -- [mdw]