Mercurial > projects > ldc

comparison dmd/attrib.c @ 663:6aaa3d3c1183

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
First part of rename to LDC.
author Christian Kamm <kamm incasoftware de>
date Mon, 06 Oct 2008 22:46:55 +0200
parents 50383e476c7e
children 20a5180f2e80
comparison
equal deleted inserted replaced
662:88e23f8c2354 663:6aaa3d3c1183
826 } 826 }
827 goto Lnodecl; 827 goto Lnodecl;
828 } 828 }
829 #endif 829 #endif
830 830
831 // LLVMDC 831 // LDC
832 #if IN_LLVM 832 #if IN_LLVM
833 833
834 // pragma(intrinsic, "string") { funcdecl(s) } 834 // pragma(intrinsic, "string") { funcdecl(s) }
835 else if (ident == Id::intrinsic) 835 else if (ident == Id::intrinsic)
836 { 836 {
919 fatal(); 919 fatal();
920 } 920 }
921 llvm_internal = LLVMva_arg; 921 llvm_internal = LLVMva_arg;
922 } 922 }
923 923
924 // pragma(llvmdc, "string") { templdecl(s) } 924 // pragma(ldc, "string") { templdecl(s) }
925 else if (ident == Id::llvmdc) 925 else if (ident == Id::ldc)
926 { 926 {
927 Expression* expr = (Expression *)args->data[0]; 927 Expression* expr = (Expression *)args->data[0];
928 expr = expr->semantic(sc); 928 expr = expr->semantic(sc);
929 if (!args || args->dim != 1 || !parseStringExp(expr, arg1str)) 929 if (!args || args->dim != 1 || !parseStringExp(expr, arg1str))
930 { 930 {
940 error("command '%s' invalid"); 940 error("command '%s' invalid");
941 fatal(); 941 fatal();
942 } 942 }
943 } 943 }
944 944
945 #endif // LLVMDC 945 #endif // LDC
946 946
947 else if (global.params.ignoreUnsupportedPragmas) 947 else if (global.params.ignoreUnsupportedPragmas)
948 { 948 {
949 if (global.params.verbose) 949 if (global.params.verbose)
950 { 950 {
980 { 980 {
981 Dsymbol *s = (Dsymbol *)decl->data[i]; 981 Dsymbol *s = (Dsymbol *)decl->data[i];
982 982
983 s->semantic(sc); 983 s->semantic(sc);
984 984
985 // LLVMDC 985 // LDC
986 #if IN_LLVM 986 #if IN_LLVM
987 987
988 if (llvm_internal) 988 if (llvm_internal)
989 { 989 {
990 if (s->llvmInternal) 990 if (s->llvmInternal)
991 { 991 {
992 error("multiple LLVMDC specific pragmas not allowed not affect the same declaration ('%s' at '%s')", s->toChars(), s->loc.toChars()); 992 error("multiple LDC specific pragmas not allowed not affect the same declaration ('%s' at '%s')", s->toChars(), s->loc.toChars());
993 fatal(); 993 fatal();
994 } 994 }
995 switch(llvm_internal) 995 switch(llvm_internal)
996 { 996 {
997 case LLVMintrinsic: 997 case LLVMintrinsic:
1068 fatal(); 1068 fatal();
1069 } 1069 }
1070 break; 1070 break;
1071 1071
1072 default: 1072 default:
1073 warning("the LLVMDC specific pragma '%s' is not yet implemented, ignoring", ident->toChars()); 1073 warning("the LDC specific pragma '%s' is not yet implemented, ignoring", ident->toChars());
1074 } 1074 }
1075 } 1075 }
1076 1076
1077 #endif // LLVMDC 1077 #endif // LDC
1078 1078
1079 } 1079 }
1080 } 1080 }
1081 return; 1081 return;
1082 1082