Permalink
Browse files

Move libpq.pm6 -> lib/DBDI/pglibpq/libpq.pm6. Delete old jdbclib-upda…

…te.pl.
  • Loading branch information...
timbunce committed Sep 6, 2010
1 parent 9b6d97f commit 4ac55d609b77791fa3b94e41e9fe182b81d67937
Showing with 3 additions and 40 deletions.
  1. +0 −38 jdbclib-update.pl
  2. +2 −1 lib/DBDI/pglibpq/Connection.pm6
  3. +1 −1 { → lib/DBDI/pglibpq}/libpq.pm6
View
@@ -1,38 +0,0 @@
-#!/usr/bin/env perl
-
-=head1 NAME
-
-mkjdbc.pl - generate the perl6 translation of the classes related to JDBC
-
-=head1 SYNOPSIS
-
- perl mkjdbc.pl
-
-=head1 DESCRIPTION
-
-This is just a quick hack to exercise java2perl6api with the use case that
-interests us most: JDBC.
-
-The jdbc_classes.txt class file lists the Java classes related to JDBC.
-This script translates those classes into the corresponding perl6 classes and
-roles in the jdbclib directory.
-
-If a jdbclib directory already exists it's renamed to jdbclib.prev and, at the
-end of the run, the contents of the directory are compared.
-
-=cut
-
-use strict;
-use warnings;
-use autodie qw(:all);
-
-my $outdir = 'jdbclib';
-
-system qq{rm -rf $outdir.prev} if -d "$outdir.prev";
-system qq{mv -f $outdir $outdir.prev} if -d $outdir;
-
-system qq{perl java2perl6api --add_types jdbclib-typemap --outdir $outdir @ARGV java.sql.DriverManager};
-
-system qq{diff -wr --exclude=*.pir -u $outdir.prev $outdir} || warn "Output differs\n"
- if -d "$outdir.prev";
-
@@ -1,12 +1,13 @@
use v6;
+use DBDI::pglibpq::libpq;
+
use java::sql::Driver;
use java::sql::Connection;
use java::sql::Statement;
use java::sql::ResultSet;
use java::sql::ResultSetMetaData;
-use libpq;
class DBDI::pglibpq::ResultSetMetaData does java::sql::ResultSetMetaData {
has $conn;
@@ -1,4 +1,4 @@
-module libpq;
+module DBDI::pglibpq::libpq;
use NativeCall; # from project 'zavolaj'

0 comments on commit 4ac55d6

Please sign in to comment.