This commit was generated by cvs2svn to compensate for changes in r2,
which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
17
libsrc/geos/process/Makefile
Normal file
17
libsrc/geos/process/Makefile
Normal file
@@ -0,0 +1,17 @@
|
||||
#
|
||||
# Makefile for GEOS lib
|
||||
# for cc65
|
||||
#
|
||||
#
|
||||
|
||||
%.o: %.s
|
||||
@echo $<
|
||||
@$(AS) -o $@ $(AFLAGS) $<
|
||||
|
||||
|
||||
S_OBJS = processinitrestartenable.o processblock.o processfreeze.o sleep.o
|
||||
|
||||
all: $(S_OBJS)
|
||||
|
||||
clean:
|
||||
@rm -f *.~ $(S_OBJS) core
|
||||
25
libsrc/geos/process/processblock.s
Normal file
25
libsrc/geos/process/processblock.s
Normal file
@@ -0,0 +1,25 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Alliance' Witkowiak
|
||||
;
|
||||
; 27.10.99
|
||||
|
||||
;
|
||||
; void InitProcesses (char number, struct process* proctab);
|
||||
; (rest)
|
||||
; void BlockProcess (char number);
|
||||
; void UnBlockProcess (char number);
|
||||
;
|
||||
|
||||
.export _BlockProcess
|
||||
.export _UnBlockProcess
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
|
||||
_BlockProcess:
|
||||
tax
|
||||
jmp BlockProcess
|
||||
|
||||
_UnBlockProcess:
|
||||
tax
|
||||
jmp UnBlockProcess
|
||||
23
libsrc/geos/process/processfreeze.s
Normal file
23
libsrc/geos/process/processfreeze.s
Normal file
@@ -0,0 +1,23 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Alliance' Witkowiak
|
||||
;
|
||||
; 27.10.99
|
||||
|
||||
;
|
||||
; void FreezeProcess (char number);
|
||||
; void UnFreezeProcess (char number);
|
||||
;
|
||||
|
||||
.export _FreezeProcess
|
||||
.export _UnFreezeProcess
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
|
||||
_FreezeProcess:
|
||||
tax
|
||||
jmp FreezeProcess
|
||||
|
||||
_UnFreezeProcess:
|
||||
tax
|
||||
jmp UnFreezeProcess
|
||||
34
libsrc/geos/process/processinitrestartenable.s
Normal file
34
libsrc/geos/process/processinitrestartenable.s
Normal file
@@ -0,0 +1,34 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Alliance' Witkowiak
|
||||
;
|
||||
; 27.10.99
|
||||
|
||||
;
|
||||
; void InitProcesses (char number, struct process* proctab);
|
||||
; void RestartProcess (char number);
|
||||
; void EnableProcess (char number);
|
||||
;
|
||||
|
||||
.import popa
|
||||
.export _InitProcesses
|
||||
.export _RestartProcess
|
||||
.export _EnableProcess
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
|
||||
_InitProcesses:
|
||||
|
||||
sta r0L
|
||||
stx r0H
|
||||
jsr popa
|
||||
jmp InitProcesses
|
||||
|
||||
_RestartProcess:
|
||||
tax
|
||||
jmp RestartProcess
|
||||
|
||||
_EnableProcess:
|
||||
tax
|
||||
jmp EnableProcess
|
||||
20
libsrc/geos/process/sleep.s
Normal file
20
libsrc/geos/process/sleep.s
Normal file
@@ -0,0 +1,20 @@
|
||||
|
||||
;
|
||||
; Maciej 'YTM/Alliance' Witkowiak
|
||||
;
|
||||
; 30.10.99
|
||||
|
||||
;
|
||||
; void Sleep (int jiffies);
|
||||
;
|
||||
|
||||
.export _Sleep
|
||||
|
||||
.include "../inc/jumptab.inc"
|
||||
.include "../inc/geossym.inc"
|
||||
|
||||
_Sleep:
|
||||
|
||||
sta r0L
|
||||
stx r0H
|
||||
jmp Sleep
|
||||
Reference in New Issue
Block a user