Mercurial > vba-clojure
view src/SFMT/SFMT-params86243.h @ 204:43bb461a7419
constructing default types....
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Fri, 23 Mar 2012 04:19:38 -0500 |
parents | f9f4f1b99eed |
children |
line wrap: on
line source
1 #ifndef SFMT_PARAMS86243_H2 #define SFMT_PARAMS86243_H4 #define POS1 3665 #define SL1 66 #define SL2 77 #define SR1 198 #define SR2 19 #define MSK1 0xfdbffbffU10 #define MSK2 0xbff7ff3fU11 #define MSK3 0xfd77efffU12 #define MSK4 0xbf9ff3ffU13 #define PARITY1 0x00000001U14 #define PARITY2 0x00000000U15 #define PARITY3 0x00000000U16 #define PARITY4 0xe9528d85U19 /* PARAMETERS FOR ALTIVEC */20 #if defined(__APPLE__) /* For OSX */21 #define ALTI_SL1 (vector unsigned int)(SL1, SL1, SL1, SL1)22 #define ALTI_SR1 (vector unsigned int)(SR1, SR1, SR1, SR1)23 #define ALTI_MSK (vector unsigned int)(MSK1, MSK2, MSK3, MSK4)24 #define ALTI_MSK64 \25 (vector unsigned int)(MSK2, MSK1, MSK4, MSK3)26 #define ALTI_SL2_PERM \27 (vector unsigned char)(25,25,25,25,3,25,25,25,7,0,1,2,11,4,5,6)28 #define ALTI_SL2_PERM64 \29 (vector unsigned char)(7,25,25,25,25,25,25,25,15,0,1,2,3,4,5,6)30 #define ALTI_SR2_PERM \31 (vector unsigned char)(7,0,1,2,11,4,5,6,15,8,9,10,17,12,13,14)32 #define ALTI_SR2_PERM64 \33 (vector unsigned char)(15,0,1,2,3,4,5,6,17,8,9,10,11,12,13,14)34 #else /* For OTHER OSs(Linux?) */35 #define ALTI_SL1 {SL1, SL1, SL1, SL1}36 #define ALTI_SR1 {SR1, SR1, SR1, SR1}37 #define ALTI_MSK {MSK1, MSK2, MSK3, MSK4}38 #define ALTI_MSK64 {MSK2, MSK1, MSK4, MSK3}39 #define ALTI_SL2_PERM {25,25,25,25,3,25,25,25,7,0,1,2,11,4,5,6}40 #define ALTI_SL2_PERM64 {7,25,25,25,25,25,25,25,15,0,1,2,3,4,5,6}41 #define ALTI_SR2_PERM {7,0,1,2,11,4,5,6,15,8,9,10,17,12,13,14}42 #define ALTI_SR2_PERM64 {15,0,1,2,3,4,5,6,17,8,9,10,11,12,13,14}43 #endif /* For OSX */44 #define IDSTR "SFMT-86243:366-6-7-19-1:fdbffbff-bff7ff3f-fd77efff-bf9ff3ff"46 #endif /* SFMT_PARAMS86243_H */