diff --git a/logforth.txt b/logforth.txt index ad993f3..ae441ae 100644 --- a/logforth.txt +++ b/logforth.txt @@ -13719,6 +13719,16 @@ New forth.lab: Added {{ }} nested compile Added a LOCAL compatible with tForth Added a GET at the free STACK +For blocks.frt version 5.96. + +2015 apr 15 +Added a midi driver in forth.lab. midi.frt can play the song of +Jones Jonesforth with different voices. + +2015 apr 23 +Added INLING, a namespace to be added to the library. +Committed midi, number theoretical functions and above. +Version 5.97. -------------------- *SET-SRC should contain a ref to SAVE @@ -13792,7 +13802,6 @@ The library goes undocumented. A very stupid comment line in the description of the memory up till EM must be removed. - The registers are not properly described in the manual. (Not using the names WOR HIP etc. Dscovered that maybe POSTPONE should be used instead of COMMA. diff --git a/toblock.c b/toblock.c index d371192..395fb6f 100644 --- a/toblock.c +++ b/toblock.c @@ -51,7 +51,11 @@ int main( int argc , char **argv ) if ( 0 == line%16 ) check_index(buffer); line += 1; count = strlen(buffer); - if ( CPL < count ) error("line too long"); + if ( CPL < count ) + { + fprintf(stderr, "%s\n", buffer ); + error("line too long"); + } buffer[--count] = '\000'; /* Remove '\n' */ for(i=0; i