diff --git a/libsrc/cbm/Makefile b/libsrc/cbm/Makefile index 31a27ac2d..639d69424 100644 --- a/libsrc/cbm/Makefile +++ b/libsrc/cbm/Makefile @@ -74,6 +74,7 @@ S_OBJS = c_acptr.o \ exehdr.o \ filedes.o \ filename.o \ + filetype.o \ filevars.o \ gotox.o \ gotoxy.o \ diff --git a/libsrc/cbm/filetype.s b/libsrc/cbm/filetype.s new file mode 100644 index 000000000..4c5b0dd7f --- /dev/null +++ b/libsrc/cbm/filetype.s @@ -0,0 +1,15 @@ +; +; Ullrich von Bassewitz, 2012-07-15 +; +; Default file type used when creating new files +; + + .export __filetype + + +.data + +__filetype: + .byte 's' ; Create sequential files by default + + diff --git a/libsrc/cbm/filevars.s b/libsrc/cbm/filevars.s index a1d5bd4e2..baaef66a4 100644 --- a/libsrc/cbm/filevars.s +++ b/libsrc/cbm/filevars.s @@ -4,18 +4,11 @@ ; Variables used for CBM file I/O ; - .export __filetype .export __curunit .constructor initcurunit, 30 .importzp devnum -.data - -__filetype: - .byte 's' ; Create sequential files by default - - .bss __curunit: