unify current time as a complete string, not an atom (#1175)

2022-01-08 11:47:35 -07:00
parent 2e46aa33c0
commit a54e42961c
1 changed files with 1 additions and 1 deletions
--- 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)]