#!perl
#-------------------------------------------------------------------------------------#
# ENVIRONMENT.pm
#-------------------------------------------------------------------------------------#
# This package defines the options for the different scripts used
# 1. The path of the different programs
# 2. The list of the sgl functions being filtered in the wrapper
#**************************************************************************************#
package ENVIRONMENT;
{#******************************************* PATH ***********************************
# The path of DisplayViewer (DYViewer.sh), the wrapper (SGLWrapper.sh), and the bin of cygwin
our $DVW_path = "D:/DisplayViewer100i6/Distrib/Scripts/DYViewer.sh";
# $DVW_path = "C:/workdir/Softwares/DisplayViewer100i6/Distrib/Scripts/DYVieweri6.sh; " #example
our $WRAP_path = "D:/SGLWrapper_v2/Scripts/SGLWrapper.sh";
# $WRAP_path = "C:/workdir/Softwares/SGLWrapper_v2/Scripts/SGLWrapper.sh"; #example
our $CYGWIN_path="C:/cygwin/bin";
# $CYGWIN_path="C:/cygwin/bin"; #example
# Important: ScadeDisplayKCG.exe and Notepad++ should be in the PATH to make the script work
#**************************************************************************************
}
{#***********************ELEMENTS FILTERED IN WRAP RESULTS*****************************
our @wrap_filter_ok=(sglNewList,sglEndList,sglCallList,
sglEnable,sglDisable,sgluSetAttribute, sglIndexColori,sglIndexLineWidthi,sglIndexLineStipplei);
our @wrap_filter_nok=("");
# the elements in OK will be kept, the elements in NOK will be deleted
# It is possible to temporarly filter a sgl function by putting both in ok and nok list
#**************************************************************************************
}
1;