Miroirs/planckforth
1
0
Fork 0
mirror of https://github.com/nineties/planckforth synced 2024-12-26 21:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

remove debug prints

Browse source
This commit is contained in:
Koichi Nakamura 2021-12-04 21:25:34 +09:00
parent 887bccb418
commit 30a5b82f1b
1 changed files with 1 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lib/string.fs
View file

@ -3,13 +3,12 @@
( === String === ) ( === String === )
." HELLO " cr
private{ private{
\ Heap-allocated string object \ Heap-allocated string object
\ p: null terminated string \ p: null terminated string
: make-string ( p -- str ) : make-string ( p -- str )
dup strlen 1 + allocate throw tuck strcpy .s dup strlen 1 + allocate throw tuck strcpy
; export ; export
: release-string ( str -- ) free ; export : release-string ( str -- ) free ; export