| #!/bin/bash |
| #/////////////////////////////////////////////////////////////////////////////// |
| #// Copyright (c) 2000-2019 Ericsson Telecom AB // |
| #// // |
| #// All rights reserved. This program and the accompanying materials // |
| #// are made available under the terms of the Eclipse Public License v2.0 // |
| #// which accompanies this distribution, and is available at // |
| #// https://www.eclipse.org/org/documents/epl-2.0/EPL-2.0.html // |
| #/////////////////////////////////////////////////////////////////////////////// |
| #prints out the list of unused functions |
| TTCN3PROF_FNS="" |
| if [ -r "TTCN3Profiler.fns" ] |
| then |
| TTCN3PROF_FNS="TTCN3Profiler.fns" |
| fi |
| |
| TTCN3PROF_INPUTFILES=$(ls *.prof 2> /dev/null) |
| |
| echo "-" |
| echo "- Profiler info is generated by ttcn3prof version 1.0 on "$(date)" for user "$USER |
| echo "-" |
| echo "" |
| gawk -f $(dirname $0)/ttcn3prof_GetUnusedFns.awk ${TTCN3PROF_FNS} ${TTCN3PROF_INPUTFILES} |
