(* Copyright (C) 1990, Digital Equipment Corporation           *)
(* All rights reserved.                                        *)
(* See the file COPYRIGHT for a full description.              *)

(*UNSAFE*) MODULE M3ASTPickle_us EXPORTS M3ASTPickle;

(* dummy implementation *)

IMPORT IO(*, Image*);
IMPORT M3AST_AS, M3AST;
IMPORT M3ASTStandAlone, M3Context(*, M3AST_pickle*);

EXCEPTION NotImplemented;

PROCEDURE Pickle(
    context: M3Context.T; 
    s: IO.Stream; 
    p: M3ASTStandAlone.ImportedUnitProc;
    reduced: BOOLEAN;
    VAR (*out*) cu: M3AST_AS.Compilation_Unit
    ): INTEGER RAISES {IO.Error}=
  BEGIN
    RAISE NotImplemented;
  END Pickle;

BEGIN

END M3ASTPickle_us.