Revert tterm.c changes.
authorMatt Birkholz <matt@birkholz.chandler.az.us>
Wed, 29 May 2013 22:56:48 +0000 (15:56 -0700)
committerMatt Birkholz <matt@birkholz.chandler.az.us>
Wed, 29 May 2013 22:56:48 +0000 (15:56 -0700)
tterm.c is not used when not USE_TERMCAP, so these old changes are
unnecessary... and potentially confusing.

src/microcode/tterm.c

index e6527faff0719e0c0859c5ecb76eb94ea47d3320..c9d969c96992149eacd81a1886b246b56dfe1f37 100644 (file)
@@ -102,23 +102,15 @@ DEFINE_PRIMITIVE ("TERMCAP-GET-NUMBER", Prim_termcap_get_number, 1, 1, 0)
 {
   PRIMITIVE_HEADER (1);
   {
-#ifdef USE_TERMCAP
     int result = (tgetnum (STRING_ARG (1)));
     PRIMITIVE_RETURN ((result < 0) ? SHARP_F : (long_to_integer (result)));
-#else
-    PRIMITIVE_RETURN (SHARP_F);
-#endif
   }
 }
 
 DEFINE_PRIMITIVE ("TERMCAP-GET-FLAG", Prim_termcap_get_flag, 1, 1, 0)
 {
   PRIMITIVE_HEADER (1);
-#ifdef USE_TERMCAP
   PRIMITIVE_RETURN (BOOLEAN_TO_OBJECT ((tgetflag (STRING_ARG (1))) != 0));
-#else
-  PRIMITIVE_RETURN (SHARP_F);
-#endif
 }
 
 DEFINE_PRIMITIVE ("TERMCAP-GET-STRING", Prim_termcap_get_string, 1, 1, 0)