]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/windows/privileges/privileges.factor
Fix comments to be ! not #!.
[factor.git] / basis / windows / privileges / privileges.factor
index 49c3a2dd24c2b592058d96de0b4524a60bf633c3..e04dfa016a0c4ac73978852184c867b1ec70c836 100644 (file)
@@ -18,11 +18,11 @@ TYPEDEF: TOKEN_PRIVILEGES* PTOKEN_PRIVILEGES
     with-out-parameters ;
 
 : open-process-token ( -- handle )
-    #! remember to CloseHandle
+    ! remember to CloseHandle
     GetCurrentProcess (open-process-token) ;
 
 : with-process-token ( quot -- )
-    #! quot: ( token-handle -- token-handle )
+    ! quot: ( token-handle -- token-handle )
     [ open-process-token ] dip
     [ keep ] curry
     [ CloseHandle drop ] [ ] cleanup ; inline