(* Copyright (C) 1989, Digital Equipment Corporation *) (* All rights reserved. *) (* See the file COPYRIGHT for a full description. *) (* File: Cstdarg.i3 *) (* Last modified on Tue May 15 07:48:33 1990 by muller *) (* modified on Fri Feb 9 15:29:05 1990 by jerome *) (***** this interface is obsolete; use M3toC instead ******) INTERFACE Cstdarg; IMPORT Ctypes; (* dummy, to force the inclusion of the implementation of this module *) PROCEDURE Foo (); VAR x := Foo; <*OBSOLETE*> TYPE Argv = UNTRACED REF ARRAY [0..255] OF Ctypes.CharStar; <*OBSOLETE*> VAR argc: INTEGER; adr_argc: ADDRESS; argv: Argv; null: ADDRESS; END Cstdarg.