diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index 08a99f30..9b4a65e7 100644
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -3148,7 +3148,7 @@ impl Machine {
     #[inline(always)]
     pub(crate) fn current_time(&mut self) {
         let timestamp = self.systemtime_to_timestamp(SystemTime::now());
-        self.machine_st.unify_atom(timestamp, self.machine_st.registers[1]);
+        self.machine_st.unify_complete_string(timestamp, self.machine_st.registers[1]);
     }
 
     #[inline(always)]