Gentran throws errors in WebREDUCE: Scalar definitions cannot be translated

[Hermann Rolfes]

Hey all! I'm experimenting with gentran, but I only get simple examples to work. When I try a little bit more advanced one:

load gentran;

GENTRANLANG!* := 'C$ 
GENTRAN
  PROCEDURE FAC N;
  BEGIN
  DECLARE FAC, N, I, F : INTEGER;
  F := FOR I:=1:N PRODUCT I;
  RETURN F
  END$

Then in WebREDUCE it causes these errors:

(defined!-in!-file . !-)
*** Scalar definitions cannot be translated

(defined!-on!-line . 3)
*** Scalar definitions cannot be translated

(procedure fac nil expr (n)
  (rblock nil (setq f (for i (1 1 n) product i)) (return f))
  ((procedure_type arrow general general) nil nil))
*** CANNOT BE TRANSLATED

Does anyone know what is wrong and/or how to fix these errors?

In my redcsl from 2014 (the only one I compiled so far) it works like a charm. However, I'm not sure if this also happens in latest redcsl, since I have no compiled binary to test with currently.

Best regards,
Hermann Rolfes

[Arthur Norman]

The info that in other cases ends up on the property list saying where a procedure was defined. Has ended up unhelpfully fed to gentran. When that info was added certainly no thought was given to gentran!.. Which needs to ignore it. I can look harder after Easter but not now. It may well also misbehave on all other up to date versions! But I can not check this week. Arthur

---

From: discussion@reduce-algebra.p.re.sourceforge.net discussion@reduce-algebra.p.re.sourceforge.net on behalf of Hermann Rolfes kungfooman@users.sourceforge.net
Sent: Saturday, March 16, 2024 5:08:23 PM
To: [reduce-algebra:discussion] 899365@discussion.reduce-algebra.p.re.sourceforge.net
Subject: [reduce-algebra:discussion] Gentran throws errors in WebREDUCE: Scalar definitions cannot be translated

Hey all! I'm experimenting with gentran, but I only get simple examples to work. When I try a little bit more advanced one:

load gentran;

GENTRANLANG!* := 'C$
GENTRAN
PROCEDURE FAC N;
BEGIN
DECLARE FAC, N, I, F : INTEGER;
F := FOR I:=1:N PRODUCT I;
RETURN F
END$

Then in WebREDUCE it causes these errors:

(defined!-in!-file . !-)
*** Scalar definitions cannot be translated

(defined!-on!-line . 3)
*** Scalar definitions cannot be translated

(procedure fac nil expr (n)
(rblock nil (setq f (for i (1 1 n) product i)) (return f))
((procedure_type arrow general general) nil nil))
*** CANNOT BE TRANSLATED

Does anyone know what is wrong and/or how to fix these errors?

In my redcsl from 2014 (the only one I compiled so far) it works like a charm. However, I'm not sure if this also happens in latest redcsl, since I have no compiled binary to test with currently.

Best regards,
Hermann Rolfes

---

Gentran throws errors in WebREDUCE: Scalar definitions cannot be translatedhttps://sourceforge.net/p/reduce-algebra/discussion/899365/thread/7dbb467b00/?limit=25#4577

---

Sent from sourceforge.net because you indicated interest in https://sourceforge.net/p/reduce-algebra/discussion/899365/

To unsubscribe from further messages, please visit https://sourceforge.net/auth/subscriptions/

[Eberhard Schruefer]

I commited a fix for the problem with gentran you reported. Your example should work now after rebuilding.
Thanks for letting us know.
Eberhard