Home | History | Annotate | Line # | Download | only in !BtNetBSD 
      1  1.1  jdolecek REM >checkro403
      2  1.1  jdolecek REM $NetBSD: checkro403,v 1.1.1.1 2002/05/09 20:03:57 jdolecek Exp $
      3  1.1  jdolecek REM
      4  1.1  jdolecek REM This program checks the build date of RISC OS to see if it is the one
      5  1.1  jdolecek REM with the bug in OS_Module 7 (RO 4.03 for the Castle Kinetic Card). If
      6  1.1  jdolecek REM so, it ensures that the memfix module has been loaded
      7  1.1  jdolecek :
      8  1.1  jdolecek ON ERROR ERROR EXT 0,"This version of RISC OS 4.03 needs the memfix module. NetBSD will not boot without it": END
      9  1.1  jdolecek SYS"XOS_ReadSysInfo",9,1 TO build$;flags%
     10  1.1  jdolecek IF (flags% AND 1)<>0 THEN END    :REM SWI returned with the V flag set
     11  1.1  jdolecek IF build$="20000507-001" THEN OSCLI"rmensure memfix 0.11 rmload <BtNetBSD$Dir>.memfix"
     12