Mercurial > hg > index.cgi

comparison src/error.s @ 119:a6a53e5c04bd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make a call stack implementation that is more complete and maybe cleaner.
author William Astle <lost@l-w.ca>
date Fri, 29 Dec 2023 01:40:39 -0700
parents bb50ac9fdf37
children 5d5472b11ccd
comparison
equal deleted inserted replaced
118:cddbe8bc07e5 119:a6a53e5c04bd
25 jsr writestrconduc ; output " in " 25 jsr writestrconduc ; output " in "
26 ldd 2,u ; get line number 26 ldd 2,u ; get line number
27 jsr print_uint16d ; display the line number 27 jsr print_uint16d ; display the line number
28 ERROR3 lds freetop ; reset the stack pointer (error routine could be called anywhere) 28 ERROR3 lds freetop ; reset the stack pointer (error routine could be called anywhere)
29 clr ,-s ; reset the call stack 29 clr ,-s ; reset the call stack
30 sts stackptr 30 sts cstackptr
31 jmp immediate ; go back to immediate mode 31 jmp immediate ; go back to immediate mode
32 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 32 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
33 ; Error messages 33 ; Error messages
34 ; 34 ;
35 ; Each error begins with a deferr macro invocation which will define a symbol err_slug with the next error number 35 ; Each error begins with a deferr macro invocation which will define a symbol err_slug with the next error number