Mercurial > vba-clojure

     1 #ifndef SFMT_PARAMS216091_H

     2 #define SFMT_PARAMS216091_H

     3 

     4 #define POS1	627

     5 #define SL1	11

     6 #define SL2	3

     7 #define SR1	10

     8 #define SR2	1

     9 #define MSK1	0xbff7bff7U

    10 #define MSK2	0xbfffffffU

    11 #define MSK3	0xbffffa7fU

    12 #define MSK4	0xffddfbfbU

    13 #define PARITY1	0xf8000001U

    14 #define PARITY2	0x89e80709U

    15 #define PARITY3	0x3bd2b64bU

    16 #define PARITY4	0x0c64b1e4U

    17 

    18 

    19 /* 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)(3,21,21,21,7,0,1,2,11,4,5,6,15,8,9,10)

    28     #define ALTI_SL2_PERM64 \

    29 	(vector unsigned char)(3,4,5,6,7,29,29,29,11,12,13,14,15,0,1,2)

    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	{3,21,21,21,7,0,1,2,11,4,5,6,15,8,9,10}

    40     #define ALTI_SL2_PERM64	{3,4,5,6,7,29,29,29,11,12,13,14,15,0,1,2}

    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-216091:627-11-3-10-1:bff7bff7-bfffffff-bffffa7f-ffddfbfb"

    45 

    46 #endif /* SFMT_PARAMS216091_H */
author	Robert McIntyre <rlm@mit.edu>
date	Tue, 27 Mar 2012 21:08:44 -0500
parents	f9f4f1b99eed
children