diff --git a/extra/postgresql/authors.txt b/extra/postgresql/authors.txt
deleted file mode 100644
index 7c1b2f2279..0000000000
--- a/extra/postgresql/authors.txt
+++ /dev/null
@@ -1 +0,0 @@
-Doug Coleman
diff --git a/extra/postgresql/libpq/libpq.factor b/extra/postgresql/libpq/libpq.factor
deleted file mode 100644
index 3b21fd8203..0000000000
--- a/extra/postgresql/libpq/libpq.factor
+++ /dev/null
@@ -1,361 +0,0 @@
-! Copyright (C) 2007 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-
-! adapted from libpq-fe.h version 7.4.7
-! tested on debian linux with postgresql 7.4.7
-! Updated to 8.1
-
-USING: alien alien.syntax combinators system ;
-IN: postgresql.libpq
-
-<<
-"postgresql" {
-    { [ win32? ]  [ "libpq.dll" ] }
-    { [ macosx? ] [ "/opt/local/lib/postgresql81/libpq.dylib" ] }
-    { [ unix?  ]  [ "libpq.so" ] }
-} cond "cdecl" add-library
->>
-
-! ConnSatusType
-: CONNECTION_OK 					HEX: 0 ; inline
-: CONNECTION_BAD					HEX: 1 ; inline
-: CONNECTION_STARTED				HEX: 2 ; inline
-: CONNECTION_MADE					HEX: 3 ; inline
-: CONNECTION_AWAITING_RESPONSE		HEX: 4 ; inline
-: CONNECTION_AUTH_OK				HEX: 5 ; inline
-: CONNECTION_SETENV					HEX: 6 ; inline
-: CONNECTION_SSL_STARTUP			HEX: 7 ; inline
-: CONNECTION_NEEDED					HEX: 8 ; inline
-
-! PostgresPollingStatusType
-: PGRES_POLLING_FAILED 				HEX: 0 ; inline
-: PGRES_POLLING_READING 			HEX: 1 ; inline
-: PGRES_POLLING_WRITING 			HEX: 2 ; inline
-: PGRES_POLLING_OK 					HEX: 3 ; inline
-: PGRES_POLLING_ACTIVE 				HEX: 4 ; inline
-
-! ExecStatusType;
-: PGRES_EMPTY_QUERY 				HEX: 0 ; inline
-: PGRES_COMMAND_OK					HEX: 1 ; inline
-: PGRES_TUPLES_OK					HEX: 2 ; inline
-: PGRES_COPY_OUT					HEX: 3 ; inline
-: PGRES_COPY_IN						HEX: 4 ; inline
-: PGRES_BAD_RESPONSE				HEX: 5 ; inline
-: PGRES_NONFATAL_ERROR				HEX: 6 ; inline
-: PGRES_FATAL_ERROR					HEX: 7 ; inline
-
-! PGTransactionStatusType;
-: PQTRANS_IDLE						HEX: 0 ; inline
-: PQTRANS_ACTIVE					HEX: 1 ; inline
-: PQTRANS_INTRANS					HEX: 2 ; inline
-: PQTRANS_INERROR					HEX: 3 ; inline
-: PQTRANS_UNKNOWN					HEX: 4 ; inline
-
-! PGVerbosity;
-: PQERRORS_TERSE					HEX: 0 ; inline
-: PQERRORS_DEFAULT					HEX: 1 ; inline
-: PQERRORS_VERBOSE					HEX: 2 ; inline
-
-
-TYPEDEF: int size_t
-TYPEDEF: int ConnStatusType
-TYPEDEF: int ExecStatusType 
-TYPEDEF: int PostgresPollingStatusType
-TYPEDEF: int PGTransactionStatusType 
-TYPEDEF: int PGVerbosity 
-
-TYPEDEF: void* PGconn*
-TYPEDEF: void* PGresult*
-TYPEDEF: void* PGcancel*
-TYPEDEF: uint Oid
-TYPEDEF: uint* Oid*
-TYPEDEF: char pqbool
-TYPEDEF: void* PQconninfoOption*
-TYPEDEF: void* PGnotify*
-TYPEDEF: void* PQArgBlock*
-TYPEDEF: void* PQprintOpt*
-TYPEDEF: void* FILE*
-TYPEDEF: void* SSL*
-
-LIBRARY: postgresql
-
-
-! Exported functions of libpq
-! ===	in fe-connect.c ===
-
-! make a new client connection to the backend
-! Asynchronous (non-blocking)
-FUNCTION: PGconn* PQconnectStart ( char* conninfo ) ;
-FUNCTION: PostgresPollingStatusType PQconnectPoll ( PGconn* conn ) ;
-
-! Synchronous (blocking)
-FUNCTION: PGconn* PQconnectdb ( char* conninfo ) ;
-FUNCTION: PGconn* PQsetdbLogin ( char* pghost, char* pgport,
-			 char* pgoptions, char* pgtty,
-			 char* dbName,
-			 char* login, char* pwd ) ;
-
-: PQsetdb ( M_PGHOST M_PGPORT M_PGOPT M_PGTTY M_DBNAME -- PGconn* )
-	f f PQsetdbLogin ;
-
-! close the current connection and free the PGconn data structure
-FUNCTION: void PQfinish ( PGconn* conn ) ;
-
-! get info about connection options known to PQconnectdb
-FUNCTION: PQconninfoOption* PQconndefaults ( ) ;
-
-! free the data structure returned by PQconndefaults()
-FUNCTION: void PQconninfoFree ( PQconninfoOption* connOptions ) ;
-
-! 
-! close the current connection and restablish a new one with the same
-! parameters
-!
-! Asynchronous (non-blocking)
-FUNCTION: int	PQresetStart ( PGconn* conn ) ;
-FUNCTION: PostgresPollingStatusType PQresetPoll ( PGconn* conn ) ;
-
-! Synchronous (blocking)
-FUNCTION: void PQreset ( PGconn* conn ) ;
-
-! request a cancel structure
-FUNCTION: PGcancel* PQgetCancel ( PGconn* conn ) ;
-
-! free a cancel structure
-FUNCTION: void PQfreeCancel ( PGcancel* cancel ) ;
-
-! issue a cancel request
-FUNCTION: int	PQrequestCancel ( PGconn* conn ) ;
-
-! Accessor functions for PGconn objects
-FUNCTION: char* PQdb ( PGconn* conn ) ;
-FUNCTION: char* PQuser ( PGconn* conn ) ;
-FUNCTION: char* PQpass ( PGconn* conn ) ;
-FUNCTION: char* PQhost ( PGconn* conn ) ;
-FUNCTION: char* PQport ( PGconn* conn ) ;
-FUNCTION: char* PQtty ( PGconn* conn ) ;
-FUNCTION: char* PQoptions ( PGconn* conn ) ;
-FUNCTION: ConnStatusType PQstatus ( PGconn* conn ) ;
-FUNCTION: PGTransactionStatusType PQtransactionStatus ( PGconn* conn ) ;
-FUNCTION: char* PQparameterStatus ( PGconn* conn,
-				  char* paramName ) ;
-FUNCTION: int	PQprotocolVersion ( PGconn* conn ) ;
-FUNCTION: int	PQServerVersion ( PGconn* conn ) ;
-FUNCTION: char* PQerrorMessage ( PGconn* conn ) ;
-FUNCTION: int	PQsocket ( PGconn* conn ) ;
-FUNCTION: int	PQbackendPID ( PGconn* conn ) ;
-FUNCTION: int	PQclientEncoding ( PGconn* conn ) ;
-FUNCTION: int	PQsetClientEncoding ( PGconn* conn, char* encoding ) ;
-
-! May not be compiled into libpq
-! Get the SSL structure associated with a connection
-FUNCTION: SSL* PQgetssl ( PGconn* conn ) ;
-
-! Tell libpq whether it needs to initialize OpenSSL
-FUNCTION: void PQinitSSL ( int do_init ) ;
-
-! Set verbosity for PQerrorMessage and PQresultErrorMessage
-FUNCTION: PGVerbosity PQsetErrorVerbosity ( PGconn* conn,
-	PGVerbosity verbosity ) ;
-
-! Enable/disable tracing
-FUNCTION: void PQtrace ( PGconn* conn, FILE* debug_port ) ;
-FUNCTION: void PQuntrace ( PGconn* conn ) ;
-
-! BROKEN
-! Function types for notice-handling callbacks
-! typedef void (*PQnoticeReceiver) (void *arg, PGresult *res);
-! typedef void (*PQnoticeProcessor) (void *arg, char* message);
-! ALIAS: void* PQnoticeReceiver
-! ALIAS: void* PQnoticeProcessor
-
-! Override default notice handling routines
-! FUNCTION: PQnoticeReceiver PQsetNoticeReceiver ( PGconn* conn,
-					! PQnoticeReceiver proc,
-					! void* arg ) ;
-! FUNCTION: PQnoticeProcessor PQsetNoticeProcessor ( PGconn* conn,
-					! PQnoticeProcessor proc,
-					! void* arg ) ;
-! END BROKEN
-
-! === in fe-exec.c ===
-
-! Simple synchronous query
-FUNCTION: PGresult* PQexec ( PGconn* conn, char* query ) ;
-FUNCTION: PGresult* PQexecParams ( PGconn* conn,
-			 char* command,
-			 int nParams,
-			 Oid* paramTypes,
-			 char** paramValues,
-			 int* paramLengths,
-			 int* paramFormats,
-			 int resultFormat ) ;
-FUNCTION: PGresult* PQprepare ( PGconn* conn, char* stmtName,
-        char* query, int nParams,
-        Oid* paramTypes ) ;
-FUNCTION: PGresult* PQexecPrepared ( PGconn* conn,
-			 char* stmtName,
-			 int nParams,
-			 char** paramValues,
-			 int* paramLengths,
-			 int* paramFormats,
-			 int resultFormat ) ;
-
-! Interface for multiple-result or asynchronous queries
-FUNCTION: int PQsendQuery ( PGconn* conn, char* query ) ;
-FUNCTION: int PQsendQueryParams ( PGconn* conn,
-				  char* command,
-				  int nParams,
-				  Oid* paramTypes,
-				  char** paramValues,
-				  int* paramLengths,
-				  int* paramFormats,
-				  int resultFormat ) ;
-FUNCTION: PGresult* PQsendPrepare ( PGconn* conn, char* stmtName,
-            char* query, int nParams,
-            Oid* paramTypes ) ;
-FUNCTION: int PQsendQueryPrepared ( PGconn* conn,
-				  char* stmtName,
-				  int nParams,
-				  char** paramValues,
-				  int *paramLengths,
-				  int *paramFormats,
-				  int resultFormat ) ;
-FUNCTION: PGresult* PQgetResult ( PGconn* conn ) ;
-
-! Routines for managing an asynchronous query
-FUNCTION: int	PQisBusy ( PGconn* conn ) ;
-FUNCTION: int	PQconsumeInput ( PGconn* conn ) ;
-
-! LISTEN/NOTIFY support
-FUNCTION: PGnotify* PQnotifies ( PGconn* conn ) ;
-
-! Routines for copy in/out
-FUNCTION: int	PQputCopyData ( PGconn* conn, char* buffer, int nbytes ) ;
-FUNCTION: int	PQputCopyEnd ( PGconn* conn, char* errormsg ) ;
-FUNCTION: int	PQgetCopyData ( PGconn* conn, char** buffer, int async ) ;
-
-! Deprecated routines for copy in/out
-FUNCTION: int	PQgetline ( PGconn* conn, char* string, int length ) ;
-FUNCTION: int	PQputline ( PGconn* conn, char* string ) ;
-FUNCTION: int	PQgetlineAsync ( PGconn* conn, char* buffer, int bufsize ) ;
-FUNCTION: int	PQputnbytes ( PGconn* conn, char* buffer, int nbytes ) ;
-FUNCTION: int	PQendcopy ( PGconn* conn ) ;
-
-! Set blocking/nonblocking connection to the backend
-FUNCTION: int	PQsetnonblocking ( PGconn* conn, int arg ) ;
-FUNCTION: int	PQisnonblocking ( PGconn* conn ) ;
-
-! Force the write buffer to be written (or at least try)
-FUNCTION: int	PQflush ( PGconn* conn ) ;
-
-! 
-! * "Fast path" interface --- not really recommended for application
-! * use
-!
-FUNCTION: PGresult* PQfn ( PGconn* conn,
-	 int fnid,
-	 int* result_buf,
-	 int* result_len,
-	 int result_is_int,
-	 PQArgBlock* args,
-	 int nargs ) ;
-
-! Accessor functions for PGresult objects
-FUNCTION: ExecStatusType PQresultStatus ( PGresult* res ) ;
-FUNCTION: char* PQresStatus ( ExecStatusType status ) ;
-FUNCTION: char* PQresultErrorMessage ( PGresult* res ) ;
-FUNCTION: char* PQresultErrorField ( PGresult* res, int fieldcode ) ;
-FUNCTION: int	PQntuples ( PGresult* res ) ;
-FUNCTION: int	PQnfields ( PGresult* res ) ;
-FUNCTION: int	PQbinaryTuples ( PGresult* res ) ;
-FUNCTION: char* PQfname ( PGresult* res, int field_num ) ;
-FUNCTION: int	PQfnumber ( PGresult* res, char* field_name ) ;
-FUNCTION: Oid	PQftable ( PGresult* res, int field_num ) ;
-FUNCTION: int	PQftablecol ( PGresult* res, int field_num ) ;
-FUNCTION: int	PQfformat ( PGresult* res, int field_num ) ;
-FUNCTION: Oid	PQftype ( PGresult* res, int field_num ) ;
-FUNCTION: int	PQfsize ( PGresult* res, int field_num ) ;
-FUNCTION: int	PQfmod ( PGresult* res, int field_num ) ;
-FUNCTION: char* PQcmdStatus ( PGresult* res ) ;
-FUNCTION: char* PQoidStatus ( PGresult* res ) ;
-FUNCTION: Oid	PQoidValue ( PGresult* res ) ;
-FUNCTION: char* PQcmdTuples ( PGresult* res ) ;
-FUNCTION: char* PQgetvalue ( PGresult* res, int tup_num, int field_num ) ;
-FUNCTION: int	PQgetlength ( PGresult* res, int tup_num, int field_num ) ;
-FUNCTION: int	PQgetisnull ( PGresult* res, int tup_num, int field_num ) ;
-
-! Delete a PGresult
-FUNCTION: void PQclear ( PGresult* res ) ;
-
-! For freeing other alloc'd results, such as PGnotify structs
-FUNCTION: void PQfreemem ( void* ptr ) ;
-
-! Exists for backward compatibility.
-: PQfreeNotify PQfreemem ;
-
-!
-! Make an empty PGresult with given status (some apps find this
-! useful). If conn is not NULL and status indicates an error, the
-! conn's errorMessage is copied.
-!
-FUNCTION: PGresult* PQmakeEmptyPGresult ( PGconn* conn, ExecStatusType status ) ;
-
-! Quoting strings before inclusion in queries.
-FUNCTION: size_t PQescapeStringConn ( PGconn* conn,
-                                    char* to, char* from, size_t length,
-                                    int* error ) ;
-FUNCTION: uchar* PQescapeByteaConn ( PGconn* conn,
-                                    char* from, size_t length,
-                                    size_t* to_length ) ;
-FUNCTION: uchar* PQunescapeBytea ( uchar* strtext,
-                size_t* retbuflen ) ;
-! These forms are deprecated!
-FUNCTION: size_t PQescapeString ( void* to, char* from, size_t length ) ;
-FUNCTION: uchar* PQescapeBytea ( uchar* bintext, size_t binlen,
-			  size_t* bytealen ) ;
-
-! === in fe-print.c ===
-
-FUNCTION: void PQprint ( FILE* fout, PGresult* res, PQprintOpt* ps ) ;
-
-! really old printing routines
-FUNCTION: void PQdisplayTuples ( PGresult* res,
-				FILE* fp,		
-				int fillAlign,
-				char* fieldSep,
-				int printHeader,
-				int quiet ) ;
-
-FUNCTION: void PQprintTuples ( PGresult* res,
-			  FILE* fout,		
-			  int printAttName,
-			  int terseOutput,	
-			  int width ) ;	
-						
-! === in fe-lobj.c ===
-
-! Large-object access routines
-FUNCTION: int	lo_open ( PGconn* conn, Oid lobjId, int mode ) ;
-FUNCTION: int	lo_close ( PGconn* conn, int fd ) ;
-FUNCTION: int	lo_read ( PGconn* conn, int fd, char* buf, size_t len ) ;
-FUNCTION: int	lo_write ( PGconn* conn, int fd, char* buf, size_t len ) ;
-FUNCTION: int	lo_lseek ( PGconn* conn, int fd, int offset, int whence ) ;
-FUNCTION: Oid	lo_creat ( PGconn* conn, int mode ) ;
-! FUNCTION: Oid	lo_creat ( PGconn* conn, Oid lobjId ) ;
-FUNCTION: int	lo_tell ( PGconn* conn, int fd ) ;
-FUNCTION: int	lo_unlink ( PGconn* conn, Oid lobjId ) ;
-FUNCTION: Oid	lo_import ( PGconn* conn, char* filename ) ;
-FUNCTION: int	lo_export ( PGconn* conn, Oid lobjId, char* filename ) ;
-
-! === in fe-misc.c ===
-
-! Determine length of multibyte encoded char at *s
-FUNCTION: int	PQmblen ( uchar* s, int encoding ) ;
-
-! Determine display length of multibyte encoded char at *s
-FUNCTION: int	PQdsplen ( uchar* s, int encoding ) ;
-
-! Get encoding id from environment variable PGCLIENTENCODING
-FUNCTION: int	PQenv2encoding ( ) ;
-
diff --git a/extra/postgresql/postgresql-tests.factor b/extra/postgresql/postgresql-tests.factor
deleted file mode 100644
index c725882b67..0000000000
--- a/extra/postgresql/postgresql-tests.factor
+++ /dev/null
@@ -1,42 +0,0 @@
-! You will need to run  'createdb factor-test' to create the database.
-! Set username and password in  the 'connect' word.
-
-IN: postgresql-test
-USING: kernel postgresql alien continuations io prettyprint
-sequences namespaces ;
-
-
-: test-connection ( host port pgopts pgtty db user pass -- bool )
-    [ [ ] with-postgres ] catch "Error connecting!" "Connected!" ? print ;
-
-! just a basic demo
-
-"localhost" "" "" "" "test" "postgres" "" [
-    "drop table animal" do-command
-
-    "create table animal (id serial not null primary key, species varchar(256), name varchar(256), age integer)" do-command
-    "insert into animal (species, name, age) values ('lion', 'Mufasa', 5)"
-    do-command
-
-    "select * from animal where name = 'Mufasa'" [ ] do-query
-    "select * from animal where name = 'Mufasa'"
-    [
-        result>seq length 1 = [ "...there can only be one Mufasa..." throw ] unless
-    ] do-query
-
-    "insert into animal (species, name, age) values ('lion', 'Simba', 1)"
-    do-command
-
-    "select * from animal" 
-    [
-          "Animal table:" print
-          result>seq print-table
-    ] do-query
-
-    ! intentional errors
-    ! [ "select asdf from animal"
-    ! [ ] do-query ] catch [ "caught: " write print ] when*
-    ! "select asdf from animal" [ ] do-query 
-    ! "aofijweafew" do-command
-] with-postgres
-
diff --git a/extra/postgresql/postgresql.factor b/extra/postgresql/postgresql.factor
deleted file mode 100644
index 9d85b6a77e..0000000000
--- a/extra/postgresql/postgresql.factor
+++ /dev/null
@@ -1,61 +0,0 @@
-! Copyright (C) 2007 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-
-! adapted from libpq-fe.h version 7.4.7
-! tested on debian linux with postgresql 7.4.7
-
-USING: arrays alien alien.syntax continuations io
-kernel math namespaces postgresql.libpq prettyprint
-quotations sequences debugger ;
-IN: postgresql
-
-SYMBOL: db
-SYMBOL: query-res
-
-: connect-postgres ( host port pgopts pgtty db user pass -- conn )
-    PQsetdbLogin
-    dup PQstatus zero? [ "couldn't connect to database" throw ] unless ;
-
-: with-postgres ( host port pgopts pgtty db user pass quot -- )
-    [ >r connect-postgres db set r>
-    [ db get PQfinish ] [ ] cleanup ] with-scope ; inline
-
-: postgres-error ( ret -- ret )
-    dup zero? [ PQresultErrorMessage throw ] when ;
-
-: (do-query) ( PGconn query -- PGresult* )
-    ! For queries that do not return rows, PQexec() returns PGRES_COMMAND_OK
-    ! For queries that return rows, PQexec() returns PGRES_TUPLES_OK
-    PQexec
-    dup PQresultStatus PGRES_COMMAND_OK =
-    over PQresultStatus PGRES_TUPLES_OK =
-    or [
-        [ PQresultErrorMessage CHAR: \n swap remove ] keep PQclear throw
-    ] unless ;
-
-: (do-command) ( PGconn query -- PGresult* )
-    [ (do-query) ] catch
-    [
-        swap
-        "non-fatal error: " print
-        "\tQuery: " write "'" write write "'" print
-        "\t" write print
-    ] when* drop ;
-
-: do-command ( str -- )
-    1quotation \ (do-command) add db get swap call ;
-
-: prepare ( str quot word -- conn quot )
-    rot 1quotation swap append swap append db get swap ;
-
-: do-query ( str quot -- )
-    [ (do-query) query-res set ] prepare catch
-    [ rethrow ] [ query-res get PQclear ] if* ;
-
-: result>seq ( -- seq )
-    query-res get [ PQnfields ] keep PQntuples
-    [ swap [ query-res get -rot PQgetvalue ] with map ] with map ;
-
-: print-table ( seq -- )
-    [ [ write bl ] each "\n" write ] each ;
-