?login_element?

Subversion Repositories NedoOS

Rev

Rev 129 | Blame | Compare with Previous | Last modification | View Log | Download

  1.     ;; test of default output file name in normal input file mode
  2.  
  3.     ; enable output into default output file ("dir_output_default_name.out")
  4.     SIZE  8     ; should be preserved across first OUTPUT directive
  5.     OUTPUT  "dir_size.bin"
  6.     DB      'Tbin'
  7.  
  8.     ; should do 2x error, modifying already set old SIZE
  9.     SIZE 16
  10.     SIZE -1
  11.  
  12.     OUTEND      ; should PAD the file up to 8B
  13.  
  14.     SIZE -1     ; shouldn't do anything, as OUTEND was supposed to reset SIZE and -1 == -1
  15.  
  16.     OUTPUT  "dir_size.tap"
  17.     DB      'Ttap'
  18.  
  19.     SIZE 16     ; make the TAP file 16B
  20.  
  21.     ; try to end + close OUTPUT by specifying new one
  22.     OUTPUT  "justToEndTap.bin"
  23.  
  24.     SIZE &      ; parsing error
  25.