ftime has an error return(?)

diff --git a/lang/cem/libcc/mon/ftime.e b/lang/cem/libcc/mon/ftime.e
index 614533a..747980a 100644 (file)
--- a/lang/cem/libcc/mon/ftime.e
+++ b/lang/cem/libcc/mon/ftime.e
@@ -6,5 +6,12 @@
  loi EM_PSIZE
  loc 35
  mon
- ret 0
+ zne *1
+ loc 0
+ bra *2
+1
+ ste errno
+ loc -1
+2
+ ret EM_WSIZE
  end