Changeset bfe96e in git for modules

Timestamp:

Mar 30, 2000, 8:37:22 AM (24 years ago)

Author:

Kai Krüger <krueger@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3bc23992051020c3e230eed5f6a96e5ff23b62a6

Parents:

014db190caff72bde1fe859653957b0785e638a0

Message:

*** empty log message ***


git-svn-id: file:///usr/local/Singular/svn/trunk@4236 2c84dea3-7e68-4137-9b89-c4e89433aadc

Location:

modules

Files:

• demo/demo.mod (modified) (5 diffs)
• pcv/pcv.mod (modified) (5 diffs)

modules/demo/demo.mod

@@ -1 +1 @@
 %{
 /*
- *  $Id: demo.mod,v 1.1 2000-03-29 13:47:24 krueger Exp $
+ *  $Id: demo.mod,v 1.2 2000-03-30 06:36:52 krueger Exp $
  *
  *  Test mod fuer modgen
@@ -14 +14 @@
 
 module="demo_module";
-version = "$Id: demo.mod,v 1.1 2000-03-29 13:47:24 krueger Exp $";
+version = "$Id: demo.mod,v 1.2 2000-03-30 06:36:52 krueger Exp $";
 info    ="
 LIBRARY: kernel.lib  PROCEDURES OF GENERAL TYPE WRITEN IN C
@@ -25 +25 @@
 //%}
 
-other ="hallo";   // should return an error
+//other ="hallo";   // should return an error
 
 //cxxsource = proclist.cc , misc.cc;
@@ -57 +57 @@
 static start_sg
 {
-//  %singularcmd;
-//  %singularcmd();
   %singularcmd(inout::f(q,w,e));
 }
@@ -77 +75 @@
   %typecheck;
   
-  %return = (void*)((int)i->Data() + (int)j->Data());
+  //%return = (void*)((int)i->Data() + (int)j->Data());
+  %return = (void *)(i + j);
 }
 example

modules/pcv/pcv.mod

@@ -1 +1 @@
 %{
 /*
- *  $Id: pcv.mod,v 1.4 2000-03-29 14:22:26 krueger Exp $
+ *  $Id: pcv.mod,v 1.5 2000-03-30 06:37:22 krueger Exp $
  *
  *  Test mod fuer modgen
@@ -13 +13 @@
 module="pcv";
 
-version="$Id: pcv.mod,v 1.4 2000-03-29 14:22:26 krueger Exp $";
+version="$Id: pcv.mod,v 1.5 2000-03-30 06:37:22 krueger Exp $";
 info="
 LIBRARY: pcv.so  CONVERSION BETWEEN POLYS AND COEF VECTORS
@@ -32 +32 @@
    %declaration;
    %typecheck;
-   %return(pcvMinDeg);
+   %return(pcvMinDeg(p));
 }
 
@@ -46 +46 @@
   
   %typecheck;
-  %return(pcvP2CV);
+  %return(pcvP2CV(pl, d0, d1));
 }
 
@@ -61 +61 @@
   
   %typecheck;
-  %return(pcvCV2P);
+  %return(pcvCV2P(pl, d0, d1));
 }