: add-timestamp ( string timestamp -- ) timestamp>hms "[" prepend "] " append prepend ; While compiling add-timestamp: In word: log-message Stack effects of the word add-timestamp do not match. Inferred: (( object object -- object )) Declared: (( string timestamp -- ))