From 65eb9a1d310682e8b60069b20a33551a2183ad8f Mon Sep 17 00:00:00 2001 From: John Benediktsson <mrjbq7@gmail.com> Date: Thu, 7 Apr 2016 07:22:52 -0700 Subject: [PATCH] Revert "alien.c-types: Implement present on pointers for help-lint." This reverts commit f865273e4d4fe584feb5bd73a4d4690f7e019cd5. --- basis/alien/c-types/c-types.factor | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/basis/alien/c-types/c-types.factor b/basis/alien/c-types/c-types.factor index 98f577fab2..18865cee4b 100644 --- a/basis/alien/c-types/c-types.factor +++ b/basis/alien/c-types/c-types.factor @@ -1,9 +1,9 @@ ! Copyright (C) 2004, 2010 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors alien alien.accessors arrays classes -combinators compiler.units cpu.architecture delegate fry kernel -layouts macros math math.order present quotations sequences -summary system words words.symbol ; +USING: accessors alien alien.accessors arrays byte-arrays +classes combinators compiler.units cpu.architecture delegate +fry kernel layouts locals macros math math.order quotations +sequences system words words.symbol summary ; IN: alien.c-types SYMBOLS: @@ -50,9 +50,6 @@ PREDICATE: c-type-word < word TUPLE: pointer { to initial: void read-only } ; C: <pointer> pointer -M: pointer present - to>> present "pointer: " prepend ; - UNION: c-type-name c-type-word pointer ;