Modified const and extern to always use blocks

examples/shell/const.q

@@ -1,7 +1,9 @@
-idtype const {
-	pid 1
-}
+const {
+	idtype {
+		pid 1
+	}
 
-state const {
-	exited 0x4
+	state {
+		exited 0x4
+	}
 }

examples/winapi/winapi.q

@@ -1,9 +1,11 @@
-user32 extern {
-	MessageBoxA(window *any, text *byte, title *byte, flags uint) -> int
-}
-
 main() {
 	title := "Title."
 	text := "Hi!"
 	user32.MessageBoxA(0, text, title, 0x240040)
+}
+
+extern {
+	user32 {
+		MessageBoxA(window *any, text *byte, title *byte, flags uint) -> int
+	}
 }