OpenBIOS July 2007

openbios@openbios.org

3 participants
65 discussions

r458 - forth/wrapper
by svn＠openbios.org 05 Jul '07

05 Jul '07

Author: wmb Date: 2007-07-05 19:14:00 +0200 (Thu, 05 Jul 2007) New Revision: 458 Modified: forth/wrapper/wrapper.c Log: wrapper.c - Changes the ifdefs to use standard GCC predefined macros like __linux__, instead of ad-hoc names like Linux, thus simplifying makefiles. Modified: forth/wrapper/wrapper.c =================================================================== --- forth/wrapper/wrapper.c 2007-07-05 17:12:04 UTC (rev 457) +++ forth/wrapper/wrapper.c 2007-07-05 17:14:00 UTC (rev 458) @@ -153,15 +153,16 @@ #define HOST_LITTLE_ENDIAN #endif -#ifdef Linux +#ifdef __linux__ char *host_os = "Linux"; #define SYS5 1 #ifdef HOSTPOWERPC #define LinuxPOWERPC char *host_cpu = "powerpc"; #else -# ifndef CKERNEL -# ifndef MIPS +# ifdef __i386__ +# ifndef CKERNEL + char *host_cpu = "x86"; # define LinuxX86 # define HOST_LITTLE_ENDIAN # endif @@ -398,7 +399,6 @@ INTERNAL long f_rmdir(); #ifdef SIM INTERNAL long printnum(); -extern int close(), open(); #endif #ifdef DLOPEN extern long dlopen(), dlsym(), dlerror(), dlclose(); @@ -1037,7 +1037,7 @@ signal(SIGFPE,exit_handler); signal(SIGBUS,exit_handler); signal(SIGSEGV,exit_handler); -#ifndef Linux +#ifndef __linux__ signal(SIGEMT,exit_handler); signal(SIGSYS,exit_handler); #endif @@ -1197,7 +1197,7 @@ } #endif -#ifdef Linux +#ifdef __linux__ static void /* set file associated with fd to */ waitchar (int fd) /* "wait for character" */ { @@ -1259,7 +1259,7 @@ #else # ifdef UNIX # ifdef SYS5 -# ifdef Linux +# ifdef __linux__ no_waitchar (0); nchars = read(0, &c[0], 1) > 0; waitchar (0); @@ -2356,7 +2356,7 @@ char *adr; long len; { -#if defined(Linux) && defined(MIPS) +#if defined(__linux__) && defined(MIPS) extern int cacheflush(char *addr, int nbytes, int cache); (void) cacheflush(adr, len, BCACHE); #endif

1 0

r457 - forth/lib
by svn＠openbios.org 05 Jul '07

05 Jul '07

Author: wmb Date: 2007-07-05 19:12:04 +0200 (Thu, 05 Jul 2007) New Revision: 457 Modified: forth/lib/cmdcpl.fth Log: Command completion - don't erase back to longest possible match. This helps when you try to complete a filename. Filename completion isn't implemented (and would be very hard to implement), but it isn't nice when someone tries to complete a filename and thus loses most of what they have already typed. Modified: forth/lib/cmdcpl.fth =================================================================== --- forth/lib/cmdcpl.fth 2007-07-05 17:09:48 UTC (rev 456) +++ forth/lib/cmdcpl.fth 2007-07-05 17:12:04 UTC (rev 457) @@ -153,6 +153,7 @@ /n +loop ( flag ) ; +0 [if] : do-erase ( -- ) \ Side effect: span and bufcursor may be reduced begin word-to-string ( addr ) @@ -163,6 +164,7 @@ cerase repeat ; +[then] : do-expand ( -- ) expand-initial-substring @@ -173,7 +175,9 @@ : expand-word ( -- ) collect-string find-candidates ( ) - #candidates @ if do-expand else do-erase then + #candidates @ if do-expand else +[ifdef] do-erase do-erase [else] beep [then] + then ; : show-candidates ( -- )

1 0

r456 - forth/kernel
by svn＠openbios.org 05 Jul '07

05 Jul '07

Author: wmb Date: 2007-07-05 19:09:48 +0200 (Thu, 05 Jul 2007) New Revision: 456 Modified: forth/kernel/kernel.fth Log: Kernel.fth - reinstated header on #-buf for PowerPC. Modified: forth/kernel/kernel.fth =================================================================== --- forth/kernel/kernel.fth 2007-07-05 17:09:11 UTC (rev 455) +++ forth/kernel/kernel.fth 2007-07-05 17:09:48 UTC (rev 456) @@ -88,8 +88,8 @@ 0 value tib +0 value #-buf headerless -0 value #-buf : init ( -- ) init [ /n h# 10 * 8 + ] literal dup alloc-mem + is #-buf /tib alloc-mem is tib

1 0

r455 - dev/olpc/cafenand
by svn＠openbios.org 05 Jul '07

05 Jul '07

Author: wmb Date: 2007-07-05 19:09:11 +0200 (Thu, 05 Jul 2007) New Revision: 455 Modified: dev/olpc/cafenand/cafenand.fth Log: OLPC CaFe NAND driver - relaxed a couple of timings per Marvell's recommendation. Modified: dev/olpc/cafenand/cafenand.fth =================================================================== --- dev/olpc/cafenand/cafenand.fth 2007-07-05 17:07:58 UTC (rev 454) +++ dev/olpc/cafenand/cafenand.fth 2007-07-05 17:09:11 UTC (rev 455) @@ -47,7 +47,7 @@ \ The following timing values are calculated from the Hynix and Samsung \ datasheets based on a clock cycle time of 10.4 nS. h# 1010.0900 h# 24 cl! \ Timing1 - h# 1.0101 h# 28 cl! \ Timing2 + h# 1.0102 h# 28 cl! \ Timing2 - recommended by Marvell h# 1000.0000 h# 2c cl! \ Timing3 ; [ifdef] notdef @@ -94,7 +94,7 @@ \ h# 90 4 1 >cmd constant read-id-cmd \ Not needed h# 20.0070 1 0 >cmd constant read-status-cmd h# 0420.0000 0 5 >cmd constant read-cmd -h# 0220.0080 0 5 >cmd constant write-cmd +h# 0220.0080 0 6 >cmd constant write-cmd \ The 6 adds a dummy address cycle to meet tADR for Hynix : wait-mask ( bitmask -- ) begin dup h# 10 cl@ and until ( bitmask )

1 0

r454 - cpu/x86
by svn＠openbios.org 05 Jul '07

05 Jul '07

Author: wmb Date: 2007-07-05 19:07:58 +0200 (Thu, 05 Jul 2007) New Revision: 454 Modified: cpu/x86/kernel.bth Log: Cleaned out some unused cruft that was already commented-out. Modified: cpu/x86/kernel.bth =================================================================== --- cpu/x86/kernel.bth 2007-06-26 17:17:25 UTC (rev 453) +++ cpu/x86/kernel.bth 2007-07-05 17:07:58 UTC (rev 454) @@ -4,8 +4,6 @@ command: &builder &this build-now -\ Copyright 1994 FirmWorks All Rights Reserved. - \ [ifdef] use-postfix-assembler \ use-postfix-assembler \ ' 386-assembler >link fence a! @@ -39,19 +37,9 @@ "" loadkern.fth last-filename "copy [then] -: lconstant constant ; -\needs lbsplit fload ${BP}/forth/lib/split.fth -\needs bitset fload ${BP}/forth/lib/bitops.fth -\ \needs name>string : name>string count ; -\ \needs id: alias id: \ -\ \needs purpose: alias purpose: \ -\ \needs copyright: alias copyright: \ -\ \needs round-up : round-up ( a b -- a' ) 1- tuck + swap not and ; - : resident ; fload ${BP}/forth/kernel/conft32.fth - fload ${BP}/forth/kernel/meta1.fth only forth also meta also definitions @@ -69,6 +57,7 @@ fload ${BP}/forth/kernel/forward.fth fload ${BP}/cpu/x86/fixvoc.fth fload ${BP}/forth/kernel/metacompile.fth + fload ${BP}/cpu/x86/metarel.fth only forth meta also forth also definitions

1 0