]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/windows/com/syntax/syntax.factor
basis: ERROR: changes.
[factor.git] / basis / windows / com / syntax / syntax.factor
index f6cf51d3d40fde2748c99b2c1b0f0e5c9295a66b..85a1fbb00ab4e9972750288904ce9ca169963933 100755 (executable)
@@ -31,7 +31,7 @@ ERROR: no-com-interface interface ;
 : find-com-interface-definition ( name -- definition )
     [
         dup +com-interface-definitions+ get-global at*
-        [ nip ] [ drop no-com-interface ] if
+        [ nip ] [ drop throw-no-com-interface ] if
     ] [ f ] if* ;
 
 : save-com-interface-definition ( definition -- )