ADT
aaron-thesis
arm-eh
ast-experimental
cleanup-dtors
deferred_resn
demangler
enum
forall-pointer-decay
jacob/cs343-translation
jenkins-sandbox
new-ast
new-ast-unique-expr
new-env
no_list
persistent-indexer
pthread-emulation
qualifiedEnum
resolv-new
with_gc
|
Last change
on this file since e2f7bc3 was e06be49, checked in by Peter A. Buhr <pabuhr@…>, 8 years ago |
|
add output coroutine test
|
-
Property mode
set to
100644
|
|
File size:
2.4 KB
|
| Line | |
|---|
| 1 | // / / Cf oral l Ve rsio
|
|---|
| 2 | n 1. 0.0 Copy righ t (C
|
|---|
| 3 | ) 20 17 U nive rsit y of
|
|---|
| 4 | Wat erlo o/// / Th e co
|
|---|
| 5 | nten ts o f th is f ile
|
|---|
| 6 | are cove red unde r th
|
|---|
| 7 | e li cenc e ag reem ent
|
|---|
| 8 | in t he// fil e "L ICEN
|
|---|
| 9 | CE" dist ribu ted with
|
|---|
| 10 | Cfo rall .// // f mtLi
|
|---|
| 11 | nes. cc - - // // Auth
|
|---|
| 12 | or : P eter
|
|---|
| 13 | A. Buhr // C reat ed O
|
|---|
| 14 | n : Su n Se p 17
|
|---|
| 15 | 21: 56:1 5 20 17// Las
|
|---|
| 16 | t Mo difi ed B y : Pete
|
|---|
| 17 | r A. Buh r// Last Mod
|
|---|
| 18 | ifie d On : M on S ep 1
|
|---|
| 19 | 8 11 :35: 57 2 017/ / Up
|
|---|
| 20 | date Cou nt : 31/
|
|---|
| 21 | / #i nclu de < fstr eam>
|
|---|
| 22 | #inc lude <co rout ine>
|
|---|
| 23 | coro utin e Fo rmat { c
|
|---|
| 24 | har ch; //
|
|---|
| 25 | use d fo r co mmun icat
|
|---|
| 26 | ion int g, b ;
|
|---|
| 27 | // g loba l be caus
|
|---|
| 28 | e us ed i n de stru ctor
|
|---|
| 29 | };vo id ? {}( Form at &
|
|---|
| 30 | fmt ) { resu me(
|
|---|
| 31 | fmt ); // s
|
|---|
| 32 | tart cor outi ne}v oid
|
|---|
| 33 | ^?{} ( Fo rmat & f mt )
|
|---|
| 34 | { if ( f mt.g !=
|
|---|
| 35 | 0 || fmt .b ! = 0 ) so
|
|---|
| 36 | ut | end l;}v oid main
|
|---|
| 37 | ( Fo rmat & f mt ) { f
|
|---|
| 38 | or ( ;; ) {
|
|---|
| 39 | // for as m any char
|
|---|
| 40 | acte rs for ( fm t.g
|
|---|
| 41 | = 0; fmt .g < 5; fmt.
|
|---|
| 42 | g += 1 ) { // g roup
|
|---|
| 43 | s of 5 b lock s for
|
|---|
| 44 | ( fm t.b = 0; fmt .b <
|
|---|
| 45 | 4; fmt. b += 1 ) { /
|
|---|
| 46 | / bl ocks of 4 ch arac
|
|---|
| 47 | ters for ( ;; ) {
|
|---|
| 48 | / / fo r ne wlin
|
|---|
| 49 | e ch arac ters sus
|
|---|
| 50 | pend (); if ( fmt
|
|---|
| 51 | .ch != ' \n' ) br eak;
|
|---|
| 52 | // ign ore newl ine
|
|---|
| 53 | } // for s out
|
|---|
| 54 | | fm t.ch ; // p
|
|---|
| 55 | rint cha ract er } /
|
|---|
| 56 | / fo r sout | " ";
|
|---|
| 57 | // p rint blo
|
|---|
| 58 | ck s epar ator } // f
|
|---|
| 59 | or sout | e ndl;
|
|---|
| 60 | // prin t gr oup
|
|---|
| 61 | sepa rato r } // f or}
|
|---|
| 62 | // m ainv oid prt( For
|
|---|
| 63 | mat & fm t, c har ch )
|
|---|
| 64 | { fm t.ch = c h;
|
|---|
| 65 | re sume ( fm t ); } //
|
|---|
| 66 | prt int main () { For
|
|---|
| 67 | mat fmt; cha r ch ; fo
|
|---|
| 68 | r ( ;; ) { sin | ch
|
|---|
| 69 | ; / / re ad o
|
|---|
| 70 | ne c hara cter i f (
|
|---|
| 71 | eof( sin ) ) bre ak;
|
|---|
| 72 | // eof ? prt(
|
|---|
| 73 | fmt , ch ); } // for
|
|---|
| 74 | } // mai n// Loca l Va
|
|---|
| 75 | riab les: /// / ta b-wi
|
|---|
| 76 | dth: 4 / /// comp ile-
|
|---|
| 77 | comm and: "cf a fm tLin
|
|---|
| 78 | es.c " // // E nd: //
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
