gpcp/MsilAsmForeign.cp

   1 (* ============================================================ *)
   2 (**     Interface to the ILASM Byte-code assembler.             *)
   3 (*      Copyright (c) John Gough 1999, 2000.                    *)
   4 (*      K John Gough, 10th June 1999                            *)
   5 (*      Modifications:                                          *)
   6 (*              Version for GPCP V0.3 April 2000 (kjg)          *)
   7 (* ============================================================ *)
   8 (*      The real code is in MsilAsm.cs                          *)
   9 (* ============================================================ *)
  10
  11 FOREIGN MODULE MsilAsm;
  12   IMPORT GPCPcopyright;
  13
  14   PROCEDURE Init*();
  15
  16   PROCEDURE Assemble*(IN file : ARRAY OF CHAR;
  17                      IN optn : ARRAY OF CHAR; (* "/debug" or "" *)
  18                             main : BOOLEAN);      (* /exe or /dll   *)
  19
  20   PROCEDURE DoAsm*(IN file : ARRAY OF CHAR;
  21                    IN optn : ARRAY OF CHAR;     (* "/debug" or "" *)
  22                       main : BOOLEAN;           (* /exe or /dll   *)
  23                       vbse : BOOLEAN;           (* verbose or not *)
  24                   OUT rslt : INTEGER);          (* ilasm ret-code *)
  25
  26 END MsilAsm.