1 files changed, 0 insertions, 64 deletions
diff --git a/src/isode/psap/ssdu2pe.c b/src/isode/psap/ssdu2pe.c
deleted file mode 100644
index 98156fd667..0000000000
--- a/src/isode/psap/ssdu2pe.c
+++ /dev/null
@@ -1,64 +0,0 @@
-/* ssdu2pe.c - read a PE from SSDU */
-
-/* 
- * isode/psap/ssdu2pe.c
- */
-
-/*
- *				  NOTICE
- *
- *    Acquisition, use, and distribution of this module and related
- *    materials are subject to the restrictions of a license agreement.
- *    Consult the Preface in the User's Manual for the full terms of
- *    this agreement.
- *
- */
-
-
-/* LINTLIBRARY */
-
-#include <stdio.h>
-#include "psap.h"
-#include "tailor.h"
-
-/*  */
-
-PE	ssdu2pe (base, len, realbase, result)
-char   *base,
-       *realbase;
-int	len;
-int    *result;
-{
-    register PE pe;
-    register PS ps;
-
-    if ((ps = ps_alloc (str_open)) == NULLPS) {
-	*result = PS_ERR_NMEM;
-	return NULLPE;
-    }
-    if (str_setup (ps, base, len, 1) == OK) {
-	if (!realbase)
-	    ps -> ps_inline = 0;
-	if (pe = ps2pe (ps)) {
-	    if (realbase)
-		pe -> pe_realbase = realbase;
-
-	    ps -> ps_errno = PS_ERR_NONE;
-	}
-	else
-	    if (ps -> ps_errno == PS_ERR_NONE)
-		ps -> ps_errno = PS_ERR_EOF;
-    }
-
-    *result = ps -> ps_errno;    
-
-    ps -> ps_inline = 1;
-    ps_free (ps);
-
-#ifdef	DEBUG
-    if (pe && (psap_log -> ll_events & LLOG_PDUS))
-	pe2text (psap_log, pe, 1, len);
-#endif
-
-    return pe;
-}