"Fossies" - the Fresh Open Source Software Archive

Member "RPerl-5.002000/lib/RPerl/Operation/Expression/Operator/Named/Keys.h" (28 Nov 2019, 2051 Bytes) of package /linux/misc/RPerl-5.002000.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) C and C++ source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. For more information about "Keys.h" see the Fossies "Dox" file reference documentation and the latest Fossies "Diffs" side-by-side code changes report: 5.000000_vs_5.002000.

    1 ////use strict;  use warnings;
    2 using std::cout;  using std::cerr;  using std::endl;
    3 
    4 #ifndef __CPP__INCLUDED__RPerl__Operation__Expression__Operator__Named__Keys_h
    5 #define __CPP__INCLUDED__RPerl__Operation__Expression__Operator__Named__Keys_h 0.001_000
    6 
    7 #include <rperltypes_mode.h> // for definitions of __PERL__TYPES or __CPP__TYPES
    8 
    9 // for type-checking subroutines & macros
   10 #include <RPerl/HelperFunctions.cpp>  // -> HelperFunctions.h
   11 
   12 // [[[ DATA TYPES ]]]
   13 #include <RPerl/DataType/Integer.cpp>
   14 #include <RPerl/DataType/Number.cpp>
   15 #include <RPerl/DataType/String.cpp>
   16 #include <RPerl/DataStructure/Array.cpp>  // -> ???    for integer_arrayref_to_string_format() used in integer_arrayref_hashref_to_string_format() ???
   17 #include <RPerl/DataStructure/Hash.cpp>  // -> ???    for ???
   18 
   19 // [[[ SUBROUTINES ]]]
   20 
   21 # ifdef __PERL__TYPES
   22 
   23 SV*                          keys(SV* input_hvref);        // short-hand, type-independent
   24 
   25 SV* integer_arrayref_hashref_keys(SV* input_avref_hvref);  //  long-hand, type-dependent
   26 
   27 # elif defined __CPP__TYPES
   28 
   29 
   30 
   31 
   32 
   33 // template, type-independent
   34 template<typename HASH_VALUE_TYPE>
   35 string_arrayref keys(std::unordered_map<string, HASH_VALUE_TYPE> const &input_unordered_map);
   36 
   37 /* NEED DELETE, TYPE-SPECIFIC CODE REPLACED BY TYPE-INDEPENDENT TEMPLATE CODE
   38 
   39 string_arrayref integer_arrayref_hashref_keys(integer_arrayref_hashref input_vector_unordered_map);  //  long-hand, type-dependent
   40                                          keys(integer_arrayref_hashref input_vector_unordered_map);  // short-hand, type-dependent
   41 */
   42 
   43 
   44 
   45 
   46 
   47 
   48 # endif
   49 
   50 // [[[ OPERATIONS & DATA TYPES REPORTER ]]]
   51 # ifdef __PERL__TYPES
   52 SV* RPerl__Operation__Expression__Operator__Named__Keys__MODE_ID() { return(newSViv(1)); }  // CPPOPS_PERLTYPES is 1
   53 # elif defined __CPP__TYPES
   54 integer RPerl__Operation__Expression__Operator__Named__Keys__MODE_ID() { return 2; }  // CPPOPS_CPPTYPES is 2
   55 # else
   56 Purposefully_die_from_a_compile-time_error,_due_to_neither___PERL__TYPES_nor___CPP__TYPES_being_defined.__We_need_to_define_exactly_one!
   57 # endif
   58 
   59 #endif