d354e871f9
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@844 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
20 lines
332 B
Awk
20 lines
332 B
Awk
#!/bin/awk
|
|
# mk_gmiconf.awk
|
|
#
|
|
# This file was originally created on 3/7/2003
|
|
# by Stasinos Konstantopoulos konstant@let.rug.nl
|
|
# as part of the YAP Prolog distribution.
|
|
#
|
|
# This file is in the Public Domain.
|
|
|
|
|
|
! /^$/ {
|
|
if( $0 in BUFF ) {
|
|
BUFF[$0] = BUFF[$0] + 2;
|
|
}
|
|
else {
|
|
BUFF[$0] = 2;
|
|
}
|
|
print $0 " " BUFF[$0];
|
|
}
|