# HG changeset patch
# User Pascal Bellard <pascal.bellard@slitaz.org>
# Date 1684091416 0
# Node ID 9d807f162a2298a63a097e9e8b7a30450e800dbb
# Parent  e483324933fa1a9b9c91945ce4fbbfdf1afc4e8a
Remove nimrod

diff -r e483324933fa -r 9d807f162a22 BootProg/stuff/boot16.asm
--- a/BootProg/stuff/boot16.asm	Sat May 13 18:02:59 2023 +0000
+++ b/BootProg/stuff/boot16.asm	Sun May 14 19:10:16 2023 +0000
@@ -96,7 +96,7 @@
 NullEntryCheck          equ     1               ; +2 bytes
 ReadRetry               equ     1               ; +9/+13 bytes
 LBAsupport              equ     1               ; +18 bytes
-CHSsanityCheck          equ     1               ; +10/+14 bytes 
+CHSsanityCheck          equ     1               ; +9/+13 bytes 
 GeometryCheck           equ     1               ; +20 bytes
 CheckAttrib             equ     0               ; +6 bytes
 WaitForKey              equ     0               ; +5 bytes
@@ -609,7 +609,7 @@
 
 %if CHSsanityCheck != 0
         cmp     ax, [bx(bpbHeadsPerCylinder)]
-        jnc     CHSoverflow
+        jns     CHSoverflow
 %endif
         xchg    ax, cx                  ; restore low LBA, save high LBA / SPT
         idiv    word [bx(bpbSectorsPerTrack)]
@@ -622,7 +622,7 @@
                 ; ax = (LBA / SPT) / HPC = cylinder
                 ; dx = (LBA / SPT) % HPC = head
 
-        xchg    ch, al                  ; clear al
+        xchg    ch, al                  ; clear al, save cylinder no.
                 ; ch = LSB 0...7 of cylinder no.
         shr     ax, 1
         shr     ax, 1
@@ -632,7 +632,7 @@
                 ; dh = head no.
 
 %if CHSsanityCheck != 0
-        sub     ah, 1                   ; set C if cylinder < 1024 (8GB max)
+        dec     ah                      ; set S if cylinder < 1024 (8GB max)
 CHSoverflow:
 %endif
         mov     si, sp
@@ -655,7 +655,7 @@
         popf
         pushf
  %endif
-        jnc     SkipCHS
+        jns     SkipCHS
 %endif
         int     13h                     ; read sectors (AL, CX, DX, ES:BX)
         jnc     ReadSectorNextSegment
diff -r e483324933fa -r 9d807f162a22 nim/receipt
--- a/nim/receipt	Sat May 13 18:02:59 2023 +0000
+++ b/nim/receipt	Sun May 14 19:10:16 2023 +0000
@@ -7,6 +7,7 @@
 MAINTAINER="maintainer@slitaz.org"
 LICENSE="MIT"
 WEB_SITE="https://www.nim-lang.org/"
+PROVIDES="nimrod"
 
 TARBALL="$PACKAGE-$VERSION.tar.xz"
 WGET_URL="${WEB_SITE}download/$TARBALL"
diff -r e483324933fa -r 9d807f162a22 nimrod/receipt
--- a/nimrod/receipt	Sat May 13 18:02:59 2023 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,47 +0,0 @@
-# SliTaz package receipt.
-
-PACKAGE="nimrod"
-VERSION="1.6.12"
-CATEGORY="development"
-SHORT_DESC="The Nimrod programming language."
-MAINTAINER="admin@trixarian.net"
-LICENSE="GPL"
-TARBALL="nim-$VERSION.tar.xz"
-WEB_SITE="https://min-lang.org/"
-WGET_URL="https://nim-lang.org/download/$TARBALL"
-PROVIDES="nim"
-
-DEPENDS="glibc-base readline"
-BUILD_DEPENDS="gcc83 glibc-dev readline-dev"
-
-# What is the latest version available today?
-current_version()
-{
-	wget -O - https://nim-lang.org/install.html 2>/dev/null | \
-	sed '/source/!d;s|.*nim-||;s|.tar.*||;q'
-}
-
-# Rules to configure and make the package.
-compile_rules()
-{
-	sed -i "s/uname -m/echo $ARCH/" build.sh
-	chmod +x build.sh
-	chmod +x install.sh
-	CC=gcc-83 ./build.sh
-	export PATH=$PATH:$src/bin
-	./bin/nim c -d:release koch
-	./bin/nim r ./koch.nim boot -d:release
-	./install.sh $DESTDIR
-}
-
-# Rules to gen a SliTaz package suitable for Tazpkg.
-genpkg_rules()
-{
-	mkdir -p $fs/usr/lib $fs/usr/share/nim
-	cp -a $install/nim/bin		$fs/usr
-	cp -a $install/nim/config	$fs/etc
-	cp -a $install/nim/lib		$fs/usr/lib/nim
-	cp -a $install/nim/nim.nimble	$fs/usr/lib/nim
-	cp -a $install/nim/compiler	$fs/usr/lib/nim
-	cp -a $install/nim/doc		$fs/usr/share/nim
-}