| 1 | #ifndef lint |
| 2 | static char sccsid[] = "@(#)cmd4.c 3.14 %G%"; |
| 3 | #endif |
| 4 | |
| 5 | /* |
| 6 | * Copyright (c) 1983 Regents of the University of California, |
| 7 | * All rights reserved. Redistribution permitted subject to |
| 8 | * the terms of the Berkeley Software License Agreement. |
| 9 | */ |
| 10 | |
| 11 | #include "defs.h" |
| 12 | |
| 13 | c_colon() |
| 14 | { |
| 15 | char oldterse = terse; |
| 16 | char buf[512]; |
| 17 | |
| 18 | setterse(0); |
| 19 | wwputc(':', cmdwin); |
| 20 | wwgets(buf, wwncol - 3, cmdwin); |
| 21 | wwputc('\n', cmdwin); |
| 22 | wwcurtowin(cmdwin); |
| 23 | setterse(oldterse); |
| 24 | if (dolongcmd(buf, (struct value *)0, 0) < 0) |
| 25 | error("Out of memory."); |
| 26 | } |