Changeset c599b4 in git for Singular/misc_ip.cc
- Timestamp:
- Nov 11, 2010, 2:40:17 PM (13 years ago)
- Branches:
- (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
- Children:
- e0cd1d27719ec0dc7eb0f1b11bcd0a5b5857b3a1
- Parents:
- 018dec2431a0bdd78906e180ed10c7a726c3640f
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/misc_ip.cc
r018dec rc599b4 80 80 q=(*n)/d; r=(*n)%d; 81 81 } 82 }83 84 /* returns an object of type lists which contains the entries85 theInts[0..(length-1)] as INT_CMDs */86 lists makeListsObject(const int* theInts, int length)87 {88 lists L=(lists)omAllocBin(slists_bin);89 L->Init(length);90 for (int i = 0; i < length; i++)91 { L->m[i].rtyp = INT_CMD; L->m[i].data = (void*)theInts[i]; }92 return L;93 82 } 94 83 … … 924 913 #endif 925 914 915 #if 0 926 916 void listall(int showproc) 927 917 { … … 1007 997 } 1008 998 #endif 999 #endif 1009 1000 1010 1001 #include <sys/types.h>
Note: See TracChangeset
for help on using the changeset viewer.