github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-01-25 19:56:30 +00:00
Code Issues Projects Releases Wiki Activity

Very simple .LIST and .NLIST implementation.

Browse Source 
Thanks to Don North. Also added a simple test.
Fixes #3.
This commit is contained in:
Olaf Seibert
2017-04-23 13:51:53 +02:00
parent c771c875cb
commit eb60cfe315
4 changed files with 56 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
tests/RunTests
View File

@@ -14,6 +14,7 @@ TESTS="test-asciz \
test-impword \
test-include \
test-jmp \
test-listing \
test-locals \
test-macro-comma \
test-prec \

26
tests/test-listing.lst.ok Normal file
View File

@@ -0,0 +1,26 @@
1 ;;;;;;
2 ;
3 ; Test the (so far very basic) .LIST and .NLIST directives.
4 ;
5
6 ; This should get listed (list_level 1)
7 .nlist
10 ; This should get listed (list_level 1)
11 .list
12 ; This should get listed (list_level 2)
13 .nlist
14 ; This should get listed (list_level 1)
15 .nlist
22 ; This should get listed (list_level 1)
22
Symbol table
. ******R 001
Program sections:
. ABS. 000000 000 (RW,I,GBL,ABS,OVR,NOSAV)
000000 001 (RW,I,LCL,REL,CON,NOSAV)

22
tests/test-listing.mac Normal file
View File

@@ -0,0 +1,22 @@
;;;;;;
;
; Test the (so far very basic) .LIST and .NLIST directives.
;
; This should get listed (list_level 1)
.nlist
; This should NOT get listed (list_level 0)
.list
; This should get listed (list_level 1)
.list
; This should get listed (list_level 2)
.nlist
; This should get listed (list_level 1)
.nlist
; This should NOT get listed (list_level 0)
.nlist
; This should NOT get listed (list_level -1)
.list
; This should NOT get listed (list_level 0)
.list
; This should get listed (list_level 1)