lib/ack/libp/sig.e

   1 #define PROC    0
   2
   3 ; $Header$
   4 ;
   5 ; (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands.
   6 ;
   7 ;          This product is part of the Amsterdam Compiler Kit.
   8 ;
   9 ; Permission to use, sell, duplicate or disclose this software must be
  10 ; obtained in writing. Requests for such permissions may be sent to
  11 ;
  12 ;      Dr. Andrew S. Tanenbaum
  13 ;      Wiskundig Seminarium
  14 ;      Vrije Universiteit
  15 ;      Postbox 7161
  16 ;      1007 MC Amsterdam
  17 ;      The Netherlands
  18 ;
  19 ;
  20
  21  mes 2,_EM_WSIZE,_EM_PSIZE
  22
  23 ; _sig is called with one parameter:
  24 ;       - procedure instance identifier (PROC)
  25 ; and returns nothing.
  26 ; only the procedure identifier inside the PROC is used.
  27
  28  exp $_sig
  29  pro $_sig,0
  30  lal PROC
  31  loi _EM_PSIZE
  32  sig
  33  asp _EM_PSIZE
  34  ret 0                  ; ignore the result of sig
  35  end ?