Changes in tests/userLiterals.cfa [e326ebca:200fcb3]
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
tests/userLiterals.cfa
re326ebca r200fcb3 5 5 // file "LICENCE" distributed with Cforall. 6 6 // 7 // user Literals.cfa --7 // user_literals.cfa -- 8 8 // 9 9 // Author : Peter A. Buhr 10 10 // Created On : Wed Sep 6 21:40:50 2017 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Wed Feb 19 07:48:45 202013 // Update Count : 7412 // Last Modified On : Tue Dec 4 22:03:10 2018 13 // Update Count : 56 14 14 // 15 15 … … 24 24 int ?`__thingy_( int x ) { sout | "_thingy_" | x; return x; } 25 25 26 int ?`s( const char * s ) { sout | "s " | s; return 0; }27 int ?`m( const char16_t * m ) { sout | "m " | m; return 0;}28 int ?`h( const char32_t * h ) { sout | "h " | h; return 0; }26 int ?`s( const char * s ) { sout | "secs" | s; return 0; } 27 int ?`m( const char16_t * m ) { sout | "mins" | m; return 0;} 28 int ?`h( const char32_t * h ) { sout | "hours" | h; return 0; } 29 29 int ?`_A_( const wchar_t * str ) { sout | "_A_" | str; return 0; } 30 30 int ?`__thingy_( const char * str ) { sout | "_thingy_" | str; return 0; } … … 37 37 return (Weight){ l.stones + r.stones }; 38 38 } 39 ofstream & ?|?( ofstream & os, Weight w ) { return os | wd(1,1, w.stones); } 40 void ?|?( ofstream & os, Weight w ) { (ofstream)(os | w); ends( os ); } 39 ofstream & ?|?( ofstream & os, Weight w ) { return os | w.stones; } 41 40 42 41 Weight ?`st( double w ) { return (Weight){ w }; } // backquote for user literals … … 61 60 sout | w; 62 61 63 0`s;62 // 0`secs; 64 63 1`s; 65 64 23`s; … … 83 82 84 83 "abc"`s; 85 // FIX ME: requires char16_t, char32_t, and wchar_t be unique types 86 // u"abc"`m; 87 // U_"abc"`h; 88 // L"abc"`_A_; 84 // u"abc"`m; 85 // U_"abc"`h; 86 // L"abc"`_A_; 89 87 u8_"abc"`__thingy_; 90 88 } // main … … 92 90 // Local Variables: // 93 91 // tab-width: 4 // 94 // compile-command: "cfa user Literals.cfa" //92 // compile-command: "cfa user_literals.cfa" // 95 93 // End: //
Note:
See TracChangeset
for help on using the changeset viewer.