gpcp/java/MsilAsm.java

   1 // (* ========================================================= *)
   2 // (**  Interface to the ILASM Byte-code assembler.             *)
   3 // (*   K John Gough, 10th June 1999                            *)
   4 // (*   Modifications:                                          *)
   5 // (*           Version for GPCP V0.3 April 2000 (kjg)          *)
   6 // (* ========================================================= *)
   7 // (*   The real code is in MsilAsm.cool                        *)
   8 // (* ========================================================= *)
   9 //
  10 //MODULE MsilAsm;
  11 //
  12 //  PROCEDURE Init*(); BEGIN END Init;
  13 //
  14 //  PROCEDURE Assemble*(IN fil,opt : ARRAY OF CHAR; main : BOOLEAN);
  15 //  BEGIN END Assemble;
  16 //
  17 //  PROCEDURE DoAsm*(IN fil,opt : ARRAY OF CHAR;
  18 //                    main,vbse : BOOLEAN;
  19 //                     OUT rslt : INTEGER);
  20 //  BEGIN END Assemble;
  21 //
  22 //END MsilAsm.
  23 //
  24 package CP.MsilAsm;
  25
  26 public class MsilAsm {
  27
  28     public static void Init() {
  29 //      if (main == null)
  30 //          main = new jasmin.Main();
  31     }
  32
  33     public static void Assemble(char[] fil, char[] opt, boolean main) {
  34     }
  35
  36     public static int DoAsm(char[] fil, char[] opt,
  37                                 boolean main, boolean vrbs) {
  38 //      String fName = CP.CPJ.CPJ.MkStr(fil);
  39 //      main.assemble(null, fName, false);
  40         return 0;
  41     }
  42
  43 }