cdo/wipforth
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Use EMIT when printing version number instead of ."

Browse Source
This commit is contained in:
Camden Dixie O'Brien
2026-03-02 19:00:57 +00:00
parent 59e6027739
commit b5c4070daf
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
prelude.f
View File

@@ -248,10 +248,10 @@ CHAR . EMIT
1 CONSTANT VERSION-MINOR
0 CONSTANT VERSION-PATCH
: VERSION-PRINT
." v" VERSION-MAJOR .
." ." VERSION-MINOR .
." ." VERSION-PATCH .
: PRINT-VERSION
CHAR v EMIT VERSION-MAJOR .
CHAR . EMIT VERSION-MINOR .
CHAR . EMIT VERSION-PATCH .
;
CHAR . EMIT
@@ -265,7 +265,7 @@ CHAR . EMIT
." |__,__/_/ .__(_)___/_//_/" CR
." /_/ " CR
CR
." Wipforth " VERSION-PRINT CR
." Wipforth " PRINT-VERSION CR
." Copyright (c) Camden Dixie O'Brien" CR
CR
." Wipforth is freely available to use, modify and distribute for personal use" CR