← Back to branch summary

~ubuntu-branches/ubuntu/wily/libsereal-encoder-perl/wily-proposed

« back to all changes in this revision

Viewing changes to const-c.inc

  • Committer: Package Import Robot
  • Author(s): gregor herrmann
  • Date: 2014-07-14 17:13:30 UTC
  • mfrom: (1.1.10)
  • Revision ID: package-import@ubuntu.com-20140714171330-u3xclw95mwd7d6lv
Tags: 3.001.002-1
* Team upload.
* New upstream development release.
  Addresses "endian or alignedness issues".
* Bump versioned build dependency on libsereal-decoder-perl.

Show diffs side-by-side

added added

removed removed

Lines of Context:
const-c.inc
582
582
}
583
583
 
584
584
static int
 
585
constant_24 (pTHX_ const char *name, IV *iv_return) {
 
586
  /* When generated this function returned values for the list of names given
 
587
     here.  However, subsequent manual editing may have added or removed some.
 
588
     SRL_HDR_SHORT_BINARY_LOW SRL_MAGIC_STRING_UINT_BE SRL_MAGIC_STRING_UINT_LE
 
589
     */
 
590
  /* Offset 22 gives the best switch position.  */
 
591
  switch (name[22]) {
 
592
  case 'B':
 
593
    if (memEQ(name, "SRL_MAGIC_STRING_UINT_BE", 24)) {
 
594
    /*                                     ^        */
 
595
#ifdef SRL_MAGIC_STRING_UINT_BE
 
596
      *iv_return = SRL_MAGIC_STRING_UINT_BE;
 
597
      return PERL_constant_ISIV;
 
598
#else
 
599
      return PERL_constant_NOTDEF;
 
600
#endif
 
601
    }
 
602
    break;
 
603
  case 'L':
 
604
    if (memEQ(name, "SRL_MAGIC_STRING_UINT_LE", 24)) {
 
605
    /*                                     ^        */
 
606
#ifdef SRL_MAGIC_STRING_UINT_LE
 
607
      *iv_return = SRL_MAGIC_STRING_UINT_LE;
 
608
      return PERL_constant_ISIV;
 
609
#else
 
610
      return PERL_constant_NOTDEF;
 
611
#endif
 
612
    }
 
613
    break;
 
614
  case 'O':
 
615
    if (memEQ(name, "SRL_HDR_SHORT_BINARY_LOW", 24)) {
 
616
    /*                                     ^        */
 
617
#ifdef SRL_HDR_SHORT_BINARY_LOW
 
618
      *iv_return = SRL_HDR_SHORT_BINARY_LOW;
 
619
      return PERL_constant_ISIV;
 
620
#else
 
621
      return PERL_constant_NOTDEF;
 
622
#endif
 
623
    }
 
624
    break;
 
625
  }
 
626
  return PERL_constant_NOTFOUND;
 
627
}
 
628
 
 
629
static int
585
630
constant_25 (pTHX_ const char *name, IV *iv_return) {
586
631
  /* When generated this function returned values for the list of names given
587
632
     here.  However, subsequent manual editing may have added or removed some.
736
781
               SRL_HDR_SHORT_BINARY SRL_HDR_SHORT_BINARY_HIGH
737
782
               SRL_HDR_SHORT_BINARY_LOW SRL_HDR_STR_UTF8 SRL_HDR_TRACK_FLAG
738
783
               SRL_HDR_TRUE SRL_HDR_UNDEF SRL_HDR_VARINT SRL_HDR_WEAKEN
739
 
               SRL_HDR_ZIGZAG SRL_MAGIC_STRING_HIGHBIT_UINT_LE
740
 
               SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE SRL_MAGIC_STRING_UINT_LE
741
 
               SRL_MAGIC_STRLEN SRL_MASK_ARRAYREF_COUNT SRL_MASK_HASHREF_COUNT
 
784
               SRL_HDR_ZIGZAG SRL_MAGIC_STRING_HIGHBIT_UINT_BE
 
785
               SRL_MAGIC_STRING_HIGHBIT_UINT_LE
 
786
               SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_BE
 
787
               SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE SRL_MAGIC_STRING_UINT_BE
 
788
               SRL_MAGIC_STRING_UINT_LE SRL_MAGIC_STRLEN
 
789
               SRL_MASK_ARRAYREF_COUNT SRL_MASK_HASHREF_COUNT
742
790
               SRL_MASK_SHORT_BINARY_LEN SRL_NEG_MIN_SIZE SRL_POS_MAX_SIZE
743
791
               SRL_PROTOCOL_ENCODING_MASK SRL_PROTOCOL_ENCODING_RAW
744
792
               SRL_PROTOCOL_ENCODING_SNAPPY
879
927
    }
880
928
    break;
881
929
  case 24:
882
 
    /* Names all of length 24.  */
883
 
    /* SRL_HDR_SHORT_BINARY_LOW SRL_MAGIC_STRING_UINT_LE */
884
 
    /* Offset 11 gives the best switch position.  */
885
 
    switch (name[11]) {
886
 
    case 'R':
887
 
      if (memEQ(name, "SRL_HDR_SHORT_BINARY_LOW", 24)) {
888
 
      /*                          ^                   */
889
 
#ifdef SRL_HDR_SHORT_BINARY_LOW
890
 
        *iv_return = SRL_HDR_SHORT_BINARY_LOW;
891
 
        return PERL_constant_ISIV;
892
 
#else
893
 
        return PERL_constant_NOTDEF;
894
 
#endif
895
 
      }
896
 
      break;
897
 
    case 'T':
898
 
      if (memEQ(name, "SRL_MAGIC_STRING_UINT_LE", 24)) {
899
 
      /*                          ^                   */
900
 
#ifdef SRL_MAGIC_STRING_UINT_LE
901
 
        *iv_return = SRL_MAGIC_STRING_UINT_LE;
902
 
        return PERL_constant_ISIV;
903
 
#else
904
 
        return PERL_constant_NOTDEF;
905
 
#endif
906
 
      }
907
 
      break;
908
 
    }
 
930
    return constant_24 (aTHX_ name, iv_return);
909
931
    break;
910
932
  case 25:
911
933
    return constant_25 (aTHX_ name, iv_return);
924
946
    }
925
947
    break;
926
948
  case 32:
927
 
    if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UINT_LE", 32)) {
 
949
    /* Names all of length 32.  */
 
950
    /* SRL_MAGIC_STRING_HIGHBIT_UINT_BE SRL_MAGIC_STRING_HIGHBIT_UINT_LE */
 
951
    /* Offset 30 gives the best switch position.  */
 
952
    switch (name[30]) {
 
953
    case 'B':
 
954
      if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UINT_BE", 32)) {
 
955
      /*                                             ^        */
 
956
#ifdef SRL_MAGIC_STRING_HIGHBIT_UINT_BE
 
957
        *iv_return = SRL_MAGIC_STRING_HIGHBIT_UINT_BE;
 
958
        return PERL_constant_ISIV;
 
959
#else
 
960
        return PERL_constant_NOTDEF;
 
961
#endif
 
962
      }
 
963
      break;
 
964
    case 'L':
 
965
      if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UINT_LE", 32)) {
 
966
      /*                                             ^        */
928
967
#ifdef SRL_MAGIC_STRING_HIGHBIT_UINT_LE
929
 
      *iv_return = SRL_MAGIC_STRING_HIGHBIT_UINT_LE;
930
 
      return PERL_constant_ISIV;
 
968
        *iv_return = SRL_MAGIC_STRING_HIGHBIT_UINT_LE;
 
969
        return PERL_constant_ISIV;
931
970
#else
932
 
      return PERL_constant_NOTDEF;
 
971
        return PERL_constant_NOTDEF;
933
972
#endif
 
973
      }
 
974
      break;
934
975
    }
935
976
    break;
936
977
  case 37:
937
 
    if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE", 37)) {
 
978
    /* Names all of length 37.  */
 
979
    /* SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_BE
 
980
       SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE */
 
981
    /* Offset 35 gives the best switch position.  */
 
982
    switch (name[35]) {
 
983
    case 'B':
 
984
      if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_BE", 37)) {
 
985
      /*                                                  ^        */
 
986
#ifdef SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_BE
 
987
        *iv_return = SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_BE;
 
988
        return PERL_constant_ISIV;
 
989
#else
 
990
        return PERL_constant_NOTDEF;
 
991
#endif
 
992
      }
 
993
      break;
 
994
    case 'L':
 
995
      if (memEQ(name, "SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE", 37)) {
 
996
      /*                                                  ^        */
938
997
#ifdef SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE
939
 
      *iv_return = SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE;
940
 
      return PERL_constant_ISIV;
 
998
        *iv_return = SRL_MAGIC_STRING_HIGHBIT_UTF8_UINT_LE;
 
999
        return PERL_constant_ISIV;
941
1000
#else
942
 
      return PERL_constant_NOTDEF;
 
1001
        return PERL_constant_NOTDEF;
943
1002
#endif
 
1003
      }
 
1004
      break;
944
1005
    }
945
1006
    break;
946
1007
  case 40: