[Author Prev][Author Next][Thread Prev][Thread Next][Author Index][Thread Index]
gEDA-bug: [ geda-Feature Requests-1565593 ] gsymcheck: check pins for grid allignment
Feature Requests item #1565593, was opened at 2006-09-26 09:36
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting:
https://sourceforge.net/tracker/?func=detail&atid=818429&aid=1565593&group_id=161080
Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: gsymcheck
Group: None
Status: Open
Priority: 5
Submitted By: Werner Hoch (werner2101)
Assigned to: Nobody/Anonymous (nobody)
Summary: gsymcheck: check pins for grid allignment
Initial Comment:
Some pins of symbols are offgrid.
gsymcheck should detect them and print an error or a
warning message.
John Luciani wrote the following Perl script to check
the symbols against that error:
----------------------------
#!/usr/bin/perl
use strict;
use warnings;
use Carp;
use File::Find;
my @Files;
my @Dirs = qw(/local/pub/geda-20050329/share/gEDA/sym/);
&find(sub {push @Files, $File::Find::name }, @Dirs);
@ARGV = @Files;
while (<>) {
next unless s/^\s*P\s+//;
my ($x1, $y1, $x2, $y2, $color, $pintype,
$whichend) = split;
print "($ARGV line $.) wrong number of
parameters\n", next unless
defined $whichend;
foreach my $coord ($whichend ? ($x2, $y2) : ($x1,
$y1)) {
next unless $coord % 100;
print "($ARGV line $.) $_\n";
last;
}
} continue {
close ARGV if eof; # reset $.
}
# Style (adapted from the Perl Cookbook, First Edition,
Recipe 12.4)
# 1. Names of functions and local variables are all
lowercase.
# 2. The program's persistent variables (either file
lexicals
# or package globals) are capitalized.
# 3. Identifiers with multiple words have each of these
# separated by an underscore for readability.
# 4. Constants are all uppercase.
# 5. If the arrow operator (->) is followed by either a
# method name or a variable containing a method name
then
# there is a space before and after the operator.
------------
----------------------------------------------------------------------
You can respond by visiting:
https://sourceforge.net/tracker/?func=detail&atid=818429&aid=1565593&group_id=161080
_______________________________________________
geda-bug mailing list
geda-bug@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-bug