2004-01-01 Richard B. Kreckel <kreckel@ginac.de>

[cln.git] / include / cln / univpoly_modint.h

diff --git a/include/cln/univpoly_modint.h b/include/cln/univpoly_modint.h
index 28f800a31e58340bcfc4f4d1e7dbad81482eab9d..e312f062421370c7df59e2adba38579ee39957ee 100644 (file)
--- a/include/cln/univpoly_modint.h
+++ b/include/cln/univpoly_modint.h
@@ -43,7 +43,7 @@ public:
        const cl_MI operator() (const cl_MI& y) const;
 public:        // Ability to place an object at a given address.
        void* operator new (size_t size) { return malloc_hook(size); }
-       void* operator new (size_t size, cl_UP_MI* ptr) { (void)size; return ptr; }
+       void* operator new (size_t size, void* ptr) { (void)size; return ptr; }
        void operator delete (void* ptr) { free_hook(ptr); }
 };
 
@@ -51,7 +51,7 @@ class cl_heap_univpoly_modint_ring : public cl_heap_univpoly_ring {
        SUBCLASS_cl_heap_univpoly_ring()
        const cl_modint_ring& basering () const { return The(cl_modint_ring)(_basering); }
        // High-level operations.
-       void fprint (cl_ostream stream, const cl_UP_MI& x)
+       void fprint (std::ostream& stream, const cl_UP_MI& x)
        {
                cl_heap_univpoly_ring::fprint(stream,x);
        }
@@ -107,6 +107,10 @@ class cl_heap_univpoly_modint_ring : public cl_heap_univpoly_ring {
        {
                return cl_heap_univpoly_ring::degree(x);
        }
+       sintL ldegree (const cl_UP_MI& x)
+       {
+               return cl_heap_univpoly_ring::ldegree(x);
+       }
        const cl_UP_MI monomial (const cl_MI& x, uintL e)
        {
                return The2(cl_UP_MI)(cl_heap_univpoly_ring::monomial(x,e));