refactored comp.c a bit

2016-10-08 17:22:48 +00:00
parent 066b5c0e0d
commit 36cdf2e062
5 changed files with 25 additions and 37 deletions
--- a/lib/print.c
+++ b/lib/print.c
@ -457,17 +457,6 @@ next:
 			OUTPUT_STRX (pr, word[WORD_SET].ptr, word[WORD_SET].len);
 			break;

-#if 0
-		case HCL_BRAND_PROCEDURE:
-			OUTPUT_STR (pr, "#<PROCEDURE>");
-			break;
-
-		case HCL_BRAND_CLOSURE:
-			OUTPUT_STR (pr, "#<CLOSURE>");
-			break;
-#endif
-
-
 		case HCL_BRAND_CFRAME:
 			OUTPUT_STRX (pr, word[WORD_CFRAME].ptr, word[WORD_CFRAME].len);
 			break;