6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2026-04-26 13:18:31 +00:00
Code Issues Projects Releases Wiki Activity

Normalized coding style.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5499 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
ol.sc
2012-02-08 16:13:01 +00:00
parent 9aac71b74a
commit 00ddcaeb93
39 changed files with 195 additions and 244 deletions
Download Patch File Download Diff File Expand all files Collapse all files
libsrc/geos-common/process/Makefile
+2 -2
View File
@@ -5,7 +5,7 @@
#--------------------------------------------------------------------------
# Object files
S_OBJS += processinitrestartenable.o \
processblock.o \
S_OBJS += processblock.o \
processfreeze.o \
processinitrestartenable.o \
processsleep.o
libsrc/geos-common/process/processblock.s
+4 -7
View File
@@ -1,15 +1,12 @@
;
; 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
@@ -17,9 +14,9 @@
.include "jumptab.inc"
_BlockProcess:
tax
jmp BlockProcess
tax
jmp BlockProcess
_UnBlockProcess:
tax
jmp UnBlockProcess
tax
jmp UnBlockProcess
libsrc/geos-common/process/processfreeze.s
+4 -7
View File
@@ -1,13 +1,10 @@
;
; Maciej 'YTM/Alliance' Witkowiak
;
; 27.10.99
;
; void FreezeProcess (char number);
; void UnFreezeProcess (char number);
;
.export _FreezeProcess
.export _UnFreezeProcess
@@ -15,9 +12,9 @@
.include "jumptab.inc"
_FreezeProcess:
tax
jmp FreezeProcess
tax
jmp FreezeProcess
_UnFreezeProcess:
tax
jmp UnFreezeProcess
tax
jmp UnFreezeProcess
libsrc/geos-common/process/processinitrestartenable.s
+8 -12
View File
@@ -1,14 +1,11 @@
;
; 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
@@ -19,16 +16,15 @@
.include "geossym.inc"
_InitProcesses:
sta r0L
stx r0H
jsr popa
jmp InitProcesses
sta r0L
stx r0H
jsr popa
jmp InitProcesses
_RestartProcess:
tax
jmp RestartProcess
tax
jmp RestartProcess
_EnableProcess:
tax
jmp EnableProcess
tax
jmp EnableProcess
libsrc/geos-common/process/processsleep.s
+19 -22
View File
@@ -1,37 +1,34 @@
;
; Maciej 'YTM/Elysium' Witkowiak
;
; 30.10.99, 15.8.2003
;
; void Sleep (int jiffies);
;
.importzp ptr1
.importzp tmp1
.export _Sleep
.include "jumptab.inc"
.include "geossym.inc"
.importzp ptr1
.importzp tmp1
_SleepExit:
jsr Sleep ; call Sleep
ldx tmp1
txs ; restore stack pointer
jmp (ptr1) ; when timeouts control will reach here
jsr Sleep ; call Sleep
ldx tmp1
txs ; restore stack pointer
jmp (ptr1) ; when timeouts control will reach here
_Sleep:
sta r0L ; store data
stx r0H
pla
sta ptr1
pla
sta ptr1+1 ; preserve return address
inc ptr1
bne @L0
inc ptr1+1 ; fix return address
@L0: tsx
stx tmp1 ; preserve stack pointer
jsr _SleepExit ; call Sleep
jmp MainLoop ; immediate return here - go to idle loop
sta r0L ; store data
stx r0H
pla
sta ptr1
pla
sta ptr1+1 ; preserve return address
inc ptr1
bne @L0
inc ptr1+1 ; fix return address
@L0: tsx
stx tmp1 ; preserve stack pointer
jsr _SleepExit ; call Sleep
jmp MainLoop ; immediate return here - go to idle loop