strcmp.sl

import stdlib/stdlib.sl
import stdlib/io.sl

: strcmp
    3 pick 2 pick @ swap @ ==
;

: main
    "g" "g"
    strcmp
    puti cr
    puts
    puts
;
strcmp example 2025-12-23 23:38:22 +01:00			`import stdlib/stdlib.sl`
			`import stdlib/io.sl`

corected the implementation of strcmp and put it in to a separate function 2025-12-24 12:41:20 +01:00			`: strcmp`
			`3 pick 2 pick @ swap @ ==`
			`;`

strcmp example 2025-12-23 23:38:22 +01:00			`: main`
corected the implementation of strcmp and put it in to a separate function 2025-12-24 12:41:20 +01:00			`"g" "g"`
			`strcmp`
strcmp example 2025-12-23 23:38:22 +01:00			`puti cr`
corected the implementation of strcmp and put it in to a separate function 2025-12-24 12:41:20 +01:00			`puts`
			`puts`
strcmp example 2025-12-23 23:38:22 +01:00			`;`