Skip to content
Open
Open
@Jos-Ven

Description

Hi,
At I am still quite happy with your Punyforth. Great work!
There is just 1 question for a primitive floating-point pack.

When highbit is defined as:
-1 1 rshift invert constant: highbit
than highbit returns 214748364
Other 32 bits systems return 2147483648
How should highbit be defined?
Thanks in advance.

Despite that problem the pack seem to work as you can see:

(stack) 10 s>f 3 s>f f/ f.
333333333e-8(stack)
10 s>f 6 s>f f/ f.
1666666666e-9(stack)

Kind regards, Jos

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions