X-Git-Url: https://git.distorted.org.uk/~mdw/catacomb/blobdiff_plain/6e088aad60fd1a7b16da1bb2be07f46fdbd55561..HEAD:/math/gfreduce.h

diff --git a/math/gfreduce.h b/math/gfreduce.h
index ef075c45..539b7c14 100644
--- a/math/gfreduce.h
+++ b/math/gfreduce.h
@@ -91,7 +91,7 @@ extern void gfreduce_destroy(gfreduce */*r*/);
 
 /* --- @gfreduce_dump@ --- *
  *
- * Arguments:	@gfreduce *r@ = structure to dump
+ * Arguments:	@const gfreduce *r@ = structure to dump
  *		@FILE *fp@ = file to dump on
  *
  * Returns:	---
@@ -99,33 +99,33 @@ extern void gfreduce_destroy(gfreduce */*r*/);
  * Use:		Dumps a reduction context.
  */
 
-extern void gfreduce_dump(gfreduce */*r*/, FILE */*fp*/);
+extern void gfreduce_dump(const gfreduce */*r*/, FILE */*fp*/);
 
 /* --- @gfreduce_do@ --- *
  *
- * Arguments:	@gfreduce *r@ = reduction context
+ * Arguments:	@const gfreduce *r@ = reduction context
  *		@mp *d@ = destination
  *		@mp *x@ = source
  *
  * Returns:	Destination, @x@ reduced modulo the reduction poly.
  */
 
-extern mp *gfreduce_do(gfreduce */*r*/, mp */*d*/, mp */*x*/);
+extern mp *gfreduce_do(const gfreduce */*r*/, mp */*d*/, mp */*x*/);
 
 /* --- @gfreduce_sqrt@ --- *
  *
- * Arguments:	@gfreduce *r@ = pointer to reduction context
+ * Arguments:	@const gfreduce *r@ = pointer to reduction context
  *		@mp *d@ = destination
  *		@mp *x@ = some polynomial
  *
  * Returns:	The square root of @x@ modulo @r->p@, or null.
  */
 
-extern mp *gfreduce_sqrt(gfreduce */*r*/, mp */*d*/, mp */*x*/);
+extern mp *gfreduce_sqrt(const gfreduce */*r*/, mp */*d*/, mp */*x*/);
 
 /* --- @gfreduce_trace@ --- *
  *
- * Arguments:	@gfreduce *r@ = pointer to reduction context
+ * Arguments:	@const gfreduce *r@ = pointer to reduction context
  *		@mp *x@ = some polynomial
  *
  * Returns:	The trace of @x@. (%$\Tr(x)=x + x^2 + \cdots + x^{2^{m-1}}$%
@@ -135,11 +135,11 @@ extern mp *gfreduce_sqrt(gfreduce */*r*/, mp */*d*/, mp */*x*/);
  *		we only need a single bit to represent it.
  */
 
-extern int gfreduce_trace(gfreduce */*r*/, mp */*x*/);
+extern int gfreduce_trace(const gfreduce */*r*/, mp */*x*/);
 
 /* --- @gfreduce_halftrace@ --- *
  *
- * Arguments:	@gfreduce *r@ = pointer to reduction context
+ * Arguments:	@const gfreduce *r@ = pointer to reduction context
  *		@mp *d@ = destination
  *		@mp *x@ = some polynomial
  *
@@ -148,11 +148,11 @@ extern int gfreduce_trace(gfreduce */*r*/, mp */*x*/);
  *		if %$x \in \gf{2^m}$% with %$m$% odd).
  */
 
-extern mp *gfreduce_halftrace(gfreduce */*r*/, mp */*d*/, mp */*x*/);
+extern mp *gfreduce_halftrace(const gfreduce */*r*/, mp */*d*/, mp */*x*/);
 
 /* --- @gfreduce_quadsolve@ --- *
  *
- * Arguments:	@gfreduce *r@ = pointer to reduction context
+ * Arguments:	@const gfreduce *r@ = pointer to reduction context
  *		@mp *d@ = destination
  *		@mp *x@ = some polynomial
  *
@@ -170,11 +170,11 @@ extern mp *gfreduce_halftrace(gfreduce */*r*/, mp */*d*/, mp */*x*/);
  *		returns the one with zero scalar coefficient.
  */
 
-extern mp *gfreduce_quadsolve(gfreduce */*r*/, mp */*d*/, mp */*x*/);
+extern mp *gfreduce_quadsolve(const gfreduce */*r*/, mp */*d*/, mp */*x*/);
 
 /* --- @gfreduce_exp@ --- *
  *
- * Arguments:	@gfreduce *gr@ = pointer to reduction context
+ * Arguments:	@const gfreduce *gr@ = pointer to reduction context
  *		@mp *d@ = fake destination
  *		@mp *a@ = base
  *		@mp *e@ = exponent
@@ -182,7 +182,8 @@ extern mp *gfreduce_quadsolve(gfreduce */*r*/, mp */*d*/, mp */*x*/);
  * Returns:	Result, %$a^e \bmod m$%.
  */
 
-extern mp *gfreduce_exp(gfreduce */*gr*/, mp */*d*/, mp */*a*/, mp */*e*/);
+extern mp *gfreduce_exp(const gfreduce */*gr*/, mp */*d*/,
+			mp */*a*/, mp */*e*/);
 
 /*----- That's all, folks -------------------------------------------------*/