1#!/usr/bin/perl
2# $FreeBSD: head/sys/pci/locate.pl 59874 2000-05-01 20:32:07Z peter $
3
4$errpos = hex($ARGV[0])/4;
5$ofs=0;
6
7open (INPUT, "cc -E ncr.c 2>/dev/null |");
8
9while ($_ = <INPUT>)
10{
--- 22 unchanged lines hidden ---
2# $FreeBSD: head/sys/pci/locate.pl 59874 2000-05-01 20:32:07Z peter $
3
4$errpos = hex($ARGV[0])/4;
5$ofs=0;
6
7open (INPUT, "cc -E ncr.c 2>/dev/null |");
8
9while ($_ = <INPUT>)
10{
--- 22 unchanged lines hidden ---