rpn(1): fixed exponentiation

.gitignore

@@ -1,3 +1,2 @@
 build/
 dist/
-*.mk

Makefile

@@ -17,7 +17,7 @@ CC=cc
 RUSTC=rustc
 
 .PHONY: all
-all: dj false fop intcmp scrut str strcmp true
+all: dj false fop intcmp rpn scrut str strcmp true
 
 build:
 	# keep build/include until bindgen(1) has stdin support
@@ -40,7 +40,6 @@ install: dist
 
 .PHONY: test
 test: build
-	tests/cc-compat.sh
 	tests/posix-compat.sh
 	$(RUSTC) --test src/getopt-rs/lib.rs -o build/test/getopt
 

src/rpn.rs

@@ -165,7 +165,7 @@ fn eval(
 						Subtract => stack.push_back(y - x),
 						Multiply => stack.push_back(y * x),
 						Divide => stack.push_back(y / x),
-						Power => stack.push_back(x.powf(y)),
+						Power => stack.push_back(y.powf(x)),
 						Floor => stack.push_back((y / x).floor()),
 						Modulo => stack.push_back(y % x),
 						_ => {},

tests/cc-compat.sh

@@ -1,40 +0,0 @@
-#!/bin/sh
-
-# Copyright (c) 2023–2024 Emma Tebibyte <emma@tebibyte.media>
-# SPDX-License-Identifier: FSFAP
-#
-# Copying and distribution of this file, with or without modification, are
-# permitted in any medium without royalty provided the copyright notice and this
-# notice are preserved.  This file is offered as-is, without any warranty.
-
-set -e
-
-if ! ls Makefile >/dev/null 2>&1
-then
-	printf '%s: Run this script in the root of the project.\n' "$0" 1>&2 
-	exit 64 # sysexits.h(3) EX_USAGE
-fi
-
-make clean
-./configure clean
-./configure
-
-for CC in cc \
-	clang \
-	gcc \
-	'zig cc'
-do
-	export CC
-
-	command -v "$(printf '%s\n' "$CC" | cut -d ' ' -f1)" >/dev/null 2>&1 \
-		|| continue
-
-	printf '%s: %s: Testing build.\n' "$0" "$CC"
-
-	make CC="$CC" && printf '%s: Build successful.\n' "$0"
-
-	ls -lA build/bin
-
-	make clean
-	printf '\n'
-done