git.sur5r.net Git - cc65/blob - libsrc/geos-cbm/process/processinitrestartenable.s

   1
   2 ;
   3 ; Maciej 'YTM/Alliance' Witkowiak
   4 ;
   5 ; 27.10.99
   6
   7 ;
   8 ; void  InitProcesses   (char number, struct process* proctab);
   9 ; void  RestartProcess  (char number);
  10 ; void  EnableProcess   (char number);
  11 ;
  12
  13             .import popa
  14             .export _InitProcesses
  15             .export _RestartProcess
  16             .export _EnableProcess
  17
  18             .include "jumptab.inc"
  19             .include "geossym.inc"
  20
  21 _InitProcesses:
  22
  23             sta r0L
  24             stx r0H
  25             jsr popa
  26             jmp InitProcesses
  27
  28 _RestartProcess:
  29             tax
  30             jmp RestartProcess
  31
  32 _EnableProcess:
  33             tax
  34             jmp EnableProcess