blob: e63e686de7b257fd3d1482fe461fc835befba592 [file] [log] [blame]
############################################################# -*- c -*-
## generic include for XXX. Do not use directly.
##
## $Id$
########################################################################
@if $m2c_mark_boundary == 1@
/** START code generated by $RCSfile$ $Revision$ */
@end@
########################################################################
##
## enums first
@if $m2c_node_skip_mapping == -1@
@ eval $m2c_node_skip_mapping = 1@
@end@
@if ($node.enums == 1) && ("$node.perltype" eq "BITS")@
/*
* TODO:242:o: update or replace BITS tests (get).
* If $node data is stored in SNMP BIT order, individual
* bit tests are redundant, and you can do a straight copy. If not, then
* update each if condition to test the correct bit.
*
* NOTE WELL: setting bit '0' for:
* C 0x0000001
* SNMP 0x8000000
*
@ if $m2c_node_skip_mapping != 1@
* define correct bit to test for all INTERNAL_* defines in the
* ${context} enum or contants header file.
*/
$example_start
$m2c_node_lh = 0;
@ foreach $e $v enum@
@ include m2c_setup_enum.m2i@
if ($m2c_ctx_rh & INTERNAL_$context.uc_$m2c_iname) {
$m2c_node_lh |= $m2c_ename;
}
@ end@ # for each
$example_end
@ else@
* assuming generated code keeps $node BITS in SNMP order.
*/
$m2c_node_lh = @m2c_ctx_rh;
@ end@
@end@
##
########################################################################
@if $m2c_mark_boundary == 1@
/** END code generated by $RCSfile$ $Revision$ */
@end@