Index: gsch2pcb-rnd/gnet-gsch2pcb-rnd.scm
===================================================================
--- gsch2pcb-rnd/gnet-gsch2pcb-rnd.scm	(revision 37808)
+++ gsch2pcb-rnd/gnet-gsch2pcb-rnd.scm	(nonexistent)
@@ -1,56 +0,0 @@
-;;; -*-scheme-*-
-;;;
-
-;;; gEDA - GPL Electronic Design Automation
-;;; gnetlist - gEDA Netlist
-;;; Copyright (C) 1998-2010 Ales Hvezda
-;;;
-;;; This program is free software; you can redistribute it and/or modify
-;;; it under the terms of the GNU General Public License as published by
-;;; the Free Software Foundation; either version 2 of the License, or
-;;; (at your option) any later version.
-;;;
-;;; This program is distributed in the hope that it will be useful,
-;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;;; GNU General Public License for more details.
-;;;
-;;; You should have received a copy of the GNU General Public License
-;;; along with this program; if not, write to the Free Software
-;;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
-;;; MA 02111-1301 USA.
-
-;;  gsch2pcb format  (based on PCBboard format by JM Routoure & Stefan Petersen)
-;;  Bill Wilson    billw@wt.net
-;;  6/17/2003
-
-;; Simplified (thrown out m4 support) specially for Igor2 by vzh
-
-;; Splits a string with space separated words and returns a list
-;; of the words (still as strings).
-(define (gsch2pcb-rnd:split-to-list the-string)
-  (filter!
-   (lambda (x) (not (string=? "" x)))
-   (string-split the-string #\space)))
-
-;; Write the footprint for the package `refdes' to `port'.
-(define (gsch2pcb-rnd:write-value-footprint refdes port)
-
-  (let ((value (gnetlist:get-package-attribute refdes "value"))
-         (footprint (gsch2pcb-rnd:split-to-list
-                     (gnetlist:get-package-attribute refdes "footprint"))))
-
-    (format port "PKG(~A,~A,~A)\n" (string-join footprint " ") refdes value)))
-
-;; Write the footprints for all the refdes' in `lst'.
-(define (gsch2pcb-rnd:write-value-footprints port lst)
-  (for-each (lambda (x) (gsch2pcb-rnd:write-value-footprint x port)) lst))
-
-
-(define (gsch2pcb-rnd output-filename)
-  (begin
-;;    (set-current-output-port (gnetlist:output-port output-filename))
-    (set-current-output-port (open-output-file output-filename))
-
-    ;; don't use m4
-    (gsch2pcb-rnd:write-value-footprints (current-output-port) packages)))
Index: gsch2pcb-rnd/gsch2pcb_scm/c1.sch
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/c1.sch	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/c1.sch	(nonexistent)
@@ -1,13 +0,0 @@
-v 20130925 2
-C 18400 56000 1 0 0 connector3-2.sym
-{
-T 19100 57700 5 10 1 1 0 6 1
-refdes=CONN1
-T 18700 57650 5 10 0 0 0 0 1
-device=CONNECTOR_3
-T 18700 57850 5 10 0 0 0 0 1
-footprint=CONNECTOR 3 1
-}
-N 18400 57200 17800 57200 4
-N 17800 56400 17800 57200 4
-N 17800 56400 18400 56400 4
Index: gsch2pcb-rnd/gsch2pcb_scm/c2.sch
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/c2.sch	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/c2.sch	(nonexistent)
@@ -1,15 +0,0 @@
-v 20130925 2
-C 18400 56000 1 0 0 connector3-2.sym
-{
-T 19100 57700 5 10 1 1 0 6 1
-refdes=CONN1
-T 18700 57650 5 10 0 0 0 0 1
-device=CONNECTOR_3
-T 18700 57850 5 10 0 0 0 0 1
-footprint=CONNECTOR 3 1
-T 19300 56200 5 10 1 0 90 0 1
-value=val123
-}
-N 18400 57200 17800 57200 4
-N 17800 56400 17800 57200 4
-N 17800 56400 18400 56400 4
Index: gsch2pcb-rnd/gsch2pcb_scm/c3.sch
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/c3.sch	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/c3.sch	(nonexistent)
@@ -1,15 +0,0 @@
-v 20130925 2
-C 18400 56000 1 0 0 connector3-2.sym
-{
-T 19100 57700 5 10 1 1 0 6 1
-refdes=CONN1
-T 18700 57650 5 10 0 0 0 0 1
-device=CONNECTOR_3
-T 18700 57850 5 10 0 0 0 0 1
-footprint=CONNECTOR(3, 1, silkmark=external)
-T 19300 56200 5 10 1 0 90 0 1
-value=val123
-}
-N 18400 57200 17800 57200 4
-N 17800 56400 17800 57200 4
-N 17800 56400 18400 56400 4
Index: gsch2pcb-rnd/gsch2pcb_scm/golden/c1.net
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/golden/c1.net	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/golden/c1.net	(nonexistent)
@@ -1 +0,0 @@
-PKG(CONNECTOR 3 1,CONN1,unknown)
Index: gsch2pcb-rnd/gsch2pcb_scm/golden/c2.net
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/golden/c2.net	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/golden/c2.net	(nonexistent)
@@ -1 +0,0 @@
-PKG(CONNECTOR 3 1,CONN1,val123)
Index: gsch2pcb-rnd/gsch2pcb_scm/golden/c3.net
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/golden/c3.net	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/golden/c3.net	(nonexistent)
@@ -1 +0,0 @@
-PKG(CONNECTOR(3, 1, silkmark=external),CONN1,val123)
Index: gsch2pcb-rnd/gsch2pcb_scm/Makefile
===================================================================
--- gsch2pcb-rnd/gsch2pcb_scm/Makefile	(revision 37808)
+++ gsch2pcb-rnd/gsch2pcb_scm/Makefile	(nonexistent)
@@ -1,17 +0,0 @@
-names = c1 c2 c3
-schematics = $(names:%=%.sch)
-netlists   = $(names:%=%.net)
-goldens    = $(names:%=golden/%.net)
-diffs      = $(names:%=%.diff)
-
-.PHONY: all clean $(netlists)
-all: $(diffs)
-
-$(diffs): %.diff: %.net golden/%.net
-	diff $^ > $@
-
-$(netlists): %.net: %.sch
-	gnetlist -g gsch2pcb-rnd -o $@ -m ../gnet-gsch2pcb-rnd.scm $<
-
-clean: 
-	-rm -rf $(diffs) $(netlists)