Changeset 6cefd4e in git

Timestamp:

Sep 14, 2005, 6:34:52 PM (19 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

a372281e1116c4ec7fe80194d365fade7ed3a455

Parents:

253eb7fd1cc7dfdb930184ad49447a6aa5500252

Message:

*bricken: further work on lists


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

Location:

modules/python

Files:

• interpreter.py (modified) (1 diff)
• interpreter_support.cc (modified) (2 diffs)

modules/python/interpreter.py

@@ -57 +57 @@
 
 def mycbm(name,*args):
-    l=i_arg_list()
-    for a in args:
-        if isinstance(a,list):
-            at=i_arg_list()
-            for a2 in a:
-                at.append(a2)
-            l.append(at)
-        else:
-            l.append(a)
+    l=list2arg_list(args)
     return cbm(name,l)

modules/python/interpreter_support.cc

@@ -177 +177 @@
     
   }
-  void appendPrelist(arg_list& l){
-    int n=l.length();
-    leftv v=initArg();
+  lists dumpToLists(){
+    int n=length();
+    
     lists res=(lists)omAlloc0Bin(slists_bin);
     res->Init(n);
     for(int i=0;i<n;i++){
-        leftv iv=l.pop_front();
+        leftv iv=pop_front();
         //swap the content
         memcpy(&res->m[i],iv,sizeof(sleftv));
@@ -189 +189 @@
         omFreeBin(iv, sleftv_bin);
     }
-    v->data=res;
+    return res;
+    
+  }
+  void appendPrelist(arg_list& l){
+    leftv v=initArg();
+    v->data=l.dumpToLists();
+
     v->rtyp=LIST_CMD;
     internal_append(v);