Return to other-tests.fs CVS log

Up to [gforth] / gforth

added double indirect threaded version and making of fully relocatable images.
added gforth-makeimage script for making fully relocatable images.
removed locals bug in if else endif constructs.
added mmap support for machines without MAP_ANON
removed command-line options -c and -o
moved definition of DOES_HANDLER_SIZE from machine.h to forth.h.
added hpux FLUSH_ICACHE in m68k.h
made source words print decimal

    1: \ various tests, especially for bugs that have been fixed
    2: 
    3: \ combination of marker and locals
    4: marker foo1
    5: marker foo2
    6: foo2
    7: 
    8: : bar { xxx yyy } ;
    9: 
   10: foo1
   11: 
   12: \ locals in an if structure
   13: : locals-test1
   14:     lp@ swap
   15:     if
   16: 	{ a } a
   17:     else
   18:     endif
   19:     lp@ <> abort" locals in if error 1" ;
   20: 
   21: 0 locals-test1
   22: 1 locals-test1
   23: 
   24: \ comments across several lines
   25: 
   26: ( fjklfjlas;d
   27: abort" ( does not work across lines"
   28: )
   29: 
   30: s" ( testing ( without delimited by newline in non-files" evaluate
   31: 
   32: \ last test!
   33: \ testing '(' without ')' at end-of-file
   34: ." expect ``warning: ')' missing''" cr
   35: (